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DASHER LP2 TP2 FIRMWARE: 


THIS FIRMWARE IG DESIGNED IN MICRO“NOVA LANGUAGE FOR 
THE USE OF DASKER PRINTER. THE PROGRAM ASSUMES THAT 
IT WILL RESIDE IN 1! 1/2 K OF ROM AND WILL HAVE 2k OF 
RAM STARTING AT LOCATION 0 AVAILABLE FOR ITS USE, 


PROGRAMMING AIDS: 


FOLLUWING INFORMATION IS IMPORTANT FOR ANY ONE TO 
UNDERSTAND THE FLOW OF THE FIRMWARE ANO TO DEBUG it. 


IN'S AND OUT’S 


IN ORDER TO SIMPLIFY THE HAROWARE DASHER DOES NOT 
SUPPORT THE I/O FUNCTIONS. ALL THE IMPUTS AND 
OUTPUTS ARE DONE USING LOAD AND STORE INSTRUCTIONS 
WITH ADDRESSES OVER 37770, 


IN FUNCTIONS 


THERE ARE EIGHT IN FUNCTIONS (INO THRU IN7) AVAIL~ 
ABLE TO INPUT INFORMATION FROM THE DASHER HARDWARE. 
THEIR ADDRESSES ARE 37770 THRU 37777. THUS LOADING 
OF AN ACCUMULATOR FROM LOCATION 37770 WILL BE REF~ 
FERED TO AS INO ANO THE ACCUMULATOR WILL GET LOADED 
WITH 16 BITS OF INFORMATION FROM THE DASHER HARDWARE. 


OUT FUNCTIONS 


ween ewennnee 


THERE ARE EIGHT OUT FUNCTIONS (OUTO THRU QUT7) AVAIL~ 
ABLE TO OUTPUT INFORMATION TO THE DASHER HAROWARE, 
THESE FUNCTIONS ARE ADDRESSED BY ADDRESSES HIGHER 

THAN 40000 ~ ADDRESS BITS 2,3, AND 4 ARE USED TO 
SELECT ONE OF THE EIGHT OUT FUNCTIONS AND THE INFOR~ 
MATION ON BITS 5 THRU 15 IS TRANSFERED TO THE DEVICE 
THUS STORING OF ANY ACCUMULATOR AT THE ADDRESS OF 

40177 WILL PERFORM AN QUT 0 AND SEND 177 TO THE OASHER, 


LIST OF IN FUNCTIONS 


USED TO READ DATA FROM CHAR GEN, 
BDATA 6-15 
BIT 0 


HOME STATUS EQUAL TO ZERO WHEN BEHIND 


HOME 


BIT 10 
BIT 11 
BIT 12 


SELF TEST INT. 
VERT INTERRUPT 
KEYBOARD INT 


EQUAL TO ZERO FOR SELF TEST 
EQUAL TO ZERO FOR VERT MOTION 
EGUAL TO ZERO KEYSOARD DATA 
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Ine 


IN3 


Ina 


INS 


IN6 
IN7 


1979 

BIT 13 TICK INTERRUPT . 
BIT 14 PRINT INTERRUPT 
BIT 15 START CHAR INT 
BIT 7 ERROR 

BITS 8-15 

BIT 0 PAPER FAULT 


B17 1 ESC DISABLE 
BITS 8 FORM FEED 


15 COUNT 
BIT 0 VIEW ENABLE 
BIT i ON LINE 
BIT 2 DATA AVAILABLE 
BIT 3 TBE 
BIT 4 CARRIER DETECT 
BIT S CLEAR TO SEND 
BIT 6 1/2 OUPLEX 
BIT 7 NOT USED 
BIT 8 LINE FEED 
BIT 9 FORM FEED 
BIT 10 DATA SET READY 
BIT 11 NOT USED 
BIT 12 NOT USED 
BIT 13° NOT USED 
BIT 14 Busy 


BIT 15 SERIAL 
RESET KEYBOARD INT. 


~ 


CORPORATION, 


EQUAL TU ZERO CLOCK TIMEOUT 
EQUAL TO ZERO PRINT POS, 


EQUAL TO ZERO FOR START OF CHAR 


EQUAL TO ZERO FOR UART ERROR 
DATA FROM UART 


EQUAL TO ZERO FOR OUT OF FORMS 
EQUAL TO ZERO TO DISABLE 

EGUAL TO ONE FOR COUNT 

OF LINES IN FORM 


EQUAL TO ONE VIEW ON 

EQUAL TO ONE FOR ON LINE 

EQUAL TO ONE FOR DATA AVAILABLE 
EQUAL TO ZERO BUSY 

ZERO FOR CARRIER DETECT 

EGUAL TO ONE FOR CLEAR 

EQUAL TO ONE FOR 1/2 DUPLEX 

AND LOCAL COPY 


EQUAL TO ZERO FOR LINE FEED 
EQUAL TO ZERO FOR FORM FEED 
EQUAL TO ZERO FOR READY 


EQUAL TO ZERO SOFTWARE BUSY 
EQUAL TO ZERO FOR SERIAL 


9-15 KEYBOARD DATA 


START TIME TASK 


BITO FORM FEED INIT 
BIT1 NOT USED 

BIT2 COMPRESSED 

PRINT JUMPER 

B8IT3 NOT USED 

BITa ALT JUMPER 
BITS NOT USED 

BIT6 NOT USED 

BIT7 NOT USED 

BIT8 6/8 LINES PER 


INCH 
BITS NOT USED 
BIT10 NOT USED 
BITLL COMPRESSED 

PRINTING MODE 
BIT1e2 NOT USED 
BIT13 ALT SELECT 
BIT14 NOT USEO 
BITiS AUTO SKIP 


LIST OF OUT FUNCTIONS 


QNE TO INIT. THE FORM FEED 
ONE IF THE JUMPER IS IN 


ONE IF THE JUMPER IS IN 


6=ZERO 
8=0NE 


ONE TO SELECT COMPRESSED 


ONE TO SELECT ALT MODE 


ONE TO ENABLE AUTO SKIP 


RESET POWER UP INIT 


~_ 
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29 
30 
31 
32 
33 
34 
35 
36 
37 
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42 
43 
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aT 
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49 
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Si 
52 
53 
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GUT1 


OUT2 


OUTS 


QuT4a 


OUTS 


OUT6 


OUT? 
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TRANSFER DATA TO HOST 
DATA 9915 


BIT 9 ERROR LIGHT 
BIT10 RUN LED 


EQUAL TO A ONE TO LIGHT LED 
EQUAL TO A ONE TO LIGHT LED 
ON CONTROL BOARD WHEN MOTOR 
HAS BEEN TURNED ON 

BIT 11 DATA TERMINAL ONE WHEN THE DEVICE IS READY 
8IT12 ON LINE ONE WHEN THE DEVICE IS ON LINE 
BIT13 READY LIGHT ON ONE TO TURN ON THE LIGHT 


BIT14 REQUEST TO SEND EQUAL TO ONE WHEN NOT BUSY 
BIT15 BREAK ONE TO SEND THE BREAK 


BIT12 SELECT ALT ONE TO SELECT ALT 
BIT13 PRINT MASK ZERO TO MASK QUT 
BITi4 PRINT SELECT 0 REG 

1 COMPRESSED 
BITis BELL 


FIRE THE PRINT WIRES 
68ITS 7-45 


MOTION CONTROL 

BIT 10 

& PAPER FEED COMMANDS 

BIT 11 

HORIZONTAL MOTION COMMANDS: 

BIT 12 INC/SLOW SPEED 

SIT 13 -DIRECTION OF 
MOTION 

BIT 14 STOP BIT 

BIT 15 110/180 SPEED 


0 TO MOVE TO THE RIGHT AND 
1 TO MOVE TO THE LEFT 
0 TO STOP THE HORIZONTAL MOTION 


INTERRUPT RESET 


BIT10 SELF TEST ONE TO RESET SELF TEST 
BIT11 VER INT ONE TO RESET VERT INT 
BIT12 NOT USED . 
BIT13 TICK ONE TO RESET TICK INT 
BIT14 = PRINT ONE TO RESET PRINT INT 
BIT15 START CHAR ONE TO RESET START CHAR 
’ 

ADDRESS FOR CHAR GEN 

BITS 6-12 CHAR 

BITS 13-15 COUNT FOR POS 


FIFO 


THE FIRMWARE HAS A SOFTWARE FIFO TO BE USED AS THE 
BUFFER BY THE PRINTER. ALL OF THE RAM LOCATIONS OVER 
OCTAL 400 WILL BE USED AS THE SUFFER. LOCATIONS 400 
THRU 407 ARE USED BY THE KEYBOARD AND REST OF THE 
BUFFER IS USED BY THE PRINTER HOWEVER DOWN LINE 
LOADED CHARACTER SETS GO IN LOCATION 2000 To 

3770 THE BUFFERS ARE CHARACTER ORIENTED AND TwO 
CHARACTERS ARE SAVED IN EACH LOCATION WITH THE LEFT 
BYTE CONTAINING THE FIRST CHARACTER. 
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04 
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22 
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29 
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32 
33 
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37 
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PICTURE OF THE FIFO (RING BUFFER) IS AS FOLLOWS: 


MASKS Nel sNUMBER OF BYTES THE FIFO CAN HOLD ~1 

Lis 0 :OFFSET FROM BASE IN BYTES OF THE LAST 
tCHARACTER STORED 

LO: N tAFTER INCREMENTING AND MASKING WITH 


MASK LO WILL HAVE THE OFFSET FROM LI 

sIN BYTES 

sTO THE LAST CHARACTER GOTTEN QUT 
BASE*2 BYTE POINTER TO THE STARTING OF THE 

sBUFFER WHERE BASE IS THE STARTING 

sADDRESS OF THE BUFFER ITSELF. 


SAVING AND RESTORING FROM THE FIFO 


CHARACTERS FROM THE KEYBOARD ARE RECEIVED ON AN 
INTERRUPT BASIS. THEY ARE SAVED IN THE KEYBOARD SUFFER 
AND ARE EITHER SENT UP TO THE HOST IF THE DEVICE IS ON 
LINE OR ARE PRINTED IF THE DEVICE IS OFF LINE. 
CHARACTERS FROM .THE HOST CPU ARE ONLY RECEIVED WHEN 
THE DEVICE IS ON LINE, IN WHICH CASE THEY ARE SAVED IN 
THE PRINTER FIFO, PRINTER STARTS PRINTING THE CHARACTERS 
AS SOON AS THEY ARE RECEIVED. WHEN A LINE TERMINATOR 
SUCH AS RETURN, LINE FEED OR FORM FEED IS RECEIVED FOUR 
BYTES FOLLOWING THE TERMINATOR ARE INITIALIZED TO 0 FOR 
THE PRINTER'S LOOK AHEAD FEATURES. FIRST BYTE GETS LOAD~ 
EO WITH THE NUMBER OF LEADING SPACES IN THE LINE FOLLOW- 
ING THE TERMINATOR, SECOND BYTE IS MADE NON-ZERO IF AN 
ESCAPE COMMAND IS PRESENT IN THE LINE AND THE THIRD BYTE 
IS LOADED WITH THE NUMBER OF CHARACTERS IN THE 
LINE. THE FOURTH BYTE HAS NUMBER OF PRINTABLE 
CHARACTERS IN THE LINE. 
eA BACKSPACE IS SUBSTITUTED BY A RETURN AND X~1 LEADING 
SPACES, WHERE X WAS THE TOTAL NUMBER OF CHARACTERS IN 
THE LINE BEFORE THE BACKSPACE WAS ISSUED. 


TABING 


BOTH VERTICAL AND HORIZONTAL TABS ARE SAVED AS ONE BIT 
PER CHARACTER POSITION FOR HORIZONTAL TABS AND LINE FEED 
POSITION FOR VERTICAL POSITION. SETTING OF TAB IS 
ACHIEVED BY SETTING THE RESPECTIVE BIT. 


SCANNING LOOP 


WHILE IDLING OR AFTER COMPLETING AN OPERATION THE 
PROGRAM RETURNS TO A LOOP STARTING AT-LABEL "SCAN", 

THIS LOOP LOOKS FOR THINGS TO DO, SUCH AS SETTING OF THE 
ON LINE FLAG, LOOKING FOR THE COMM. LINES’ STATUS, CHA= 
RACTERS RECEIVED FROM THE HOST, CHARACTERS TO BE PRINTED, 
ESCAPE COMMANDS, ETC. CHARACTERS RECEIVED FROM THE HOST 
ARE ONLY READ AND SAVED IF THE PRINTER IS ON LINE AND 
THE PRINT BUFFER IS NOT FULL. 

IF A KEY WAS HIT, THE PRINTER IS ON LINE AND THE UART IS 
FREE THEN THE ASCII CODE OF THE KEY IS SENT TO THE HOST. 
IF AT THAT TIME A LOCAL COPY WAS DESIRED THEN 
PREPARATION IS MADE TO PRINT THE CHARACTER. 

WHEN THE PRINTER BECOMES AVAILABLE THE NEXT CHARACTER TO 
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BE PRINTED IS TAKEN FROM THE FIFO (KEY BUARD BUFFER IF 
IT IS OFF LINE AND PRINT BUFFER IF IT IS ONLINE). IF THE 
FIFO IS EMPTY THEN A STOP COMMAND TO THE HORIZONTAL STEP 
MOTOR IS ISSUED AND THE SCAN LOOP IS REPEATED. IF THERE 
IS A CHARACTER TO BE PRINTED THEN A COUNTER "PRCNT" IS 
SET TO THE NUMBER OF TIMES THE PRINT WIRES WILL BE FIRED 
(7 FOR -REGULAR AND 13 FOR ELONGATED). 

AFTER PRINTING OF THE FIRST CHARACTER BEGINS THE NEXT 
CHARACTER IS READ FROM THE FIFO AND CHECKEO FOR A ESCAPE 
COMMANDO, WHICH IF PRESENT IS EXECUTED. 


IF THE CHARACTER TO HE EXECUTED IS A LINE TERMINATOR 

THE PROGRAM FLOW JUMPS TO THE LABEL "NXTLN" AND BASED ON 
THE POSITION OF THE HEAD ANDO THE LENGTH OF THE NEXT LINE 
A DECISION REGARDING THE PRINT DIRECTION IS MADE ALONG 
WITH OECISIONS ABOUT THE OPTIONS WHICH CAN ONLY BE 
SELECTED ON A LINE BY LINE BASIS SUCH AS COMPRESSED 
PRINT MODE. 


USER'S INFORMATION 


DASHER IS AN INTELLIGENT PRINTER CAPABLE OF MAKING 
DECISIONS WHEN NEEDED, SUCH AS THE PRINT DIRECTION 
OF THE FOLLOWING LINE AFTER COMPLETING A LINE. OTHER 
FEATURES INCLUDE THE FOLLOWING COMMANDS, 


COMMAND STRING 


severe woserwve 


CNT. O DESELECT ALT MODE 
CNT. N SELECT ALT MODE 


ESCAPE I.E. A CODE OF 33 IS CONSIDERED THE STARTING OF A 

COMMAND STRING. 

ESC 1 SETS HORIZONTAL TAB AT THE PRINT HEAD POSITION. 

ESC 2 CLEARS HORIZONTAL TAB AT THE PRINT HEAD POSITION. 

Esc 5 SETS VERTICAL TAB AT CURRENT LINE POSITION. 

ESC 6 CLEARS VERTICAL TAB AT CURRENT LINE POSITION, 

ESC CC(LOWER CASE) MASTER RESET 

Esc Y 2 BYTES OF BYTE COUNT, 2 BYTES OF STARTING BYTE 
ADDRESS, DATA, AND 1 BYTE OF NEGATED CHECK SUM 
IS THE SEQUENCE TO BE FOLLOWED FOR DOWN LINE 
LOADING INFORMATION IN THE DASHER MEMORY. 

ESC S(LOWER CASE) DESELECT UNDER SCORE 

ESC AC(LOWER CASE) SELECT UNDER SCORE 

ESC EC(LOWER CASE) CLEARS PLOTTING MODE 

ESC DILOWER CASE) SETS PLOTTING MODE 

Esc CLEARS COMPRESSED PRINT MODE. 


ESC >: SETS COMPRESSED PRINT MODE. 

ESc = CLEARS ELONGATED PRINT MODE. 

ESC < SETS ELONGATED PRINT MODE. 

Esc N 2 BYTES OF ADDRESS, SELECTS DOWN LINE LOADED 


CHARACTER SET STARTING AT THE GIVEN ADDRESS. 
Esc Z 2@ BYTES OF ADDRESS, STARTS EXECUTING THE DOWN 
LINE LOADED PROGRAM AT THE DEFINED ADDRESS. 
ESE E 41,82,83,..eNULL, SETS HORIZONTAL TABS AT 
LOCATIONS #N, WHERE #4N IS THE HORIZONTAL 
POSITION OF THE PRINT HEAD. 
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ESC E NULL, CLEARS ALL OF THE HORIZONTAL TABS 

ESC F H1e8#2e43,e0eeeNULL, SETS VERTICAL TABS AT 
LOCATION #N, WHERE #N IS THE VERTICAL 
POSITION OF THE PRINT HEAD. 

ESC F NULL, CLEARS ALL OF THE VERTICAL TABS. 

Esc 0 CLEARS DOWN LINE LOADED CHARACTER SET. 

NOTE 
NOTE #1,82¢#3 ONLY AN QCTAL VALUE REQUIRED 
(012) LINE FEED KEY SETS FIRST TAB AT POS 
ITION 10 FOR FIRST TAB OCTAL (024) SETS 
SECOND TAB AT POSITION 20 ETC. 


RESTRICTIONS TO THE COMMAND STRING 


1. COMPRESSEO MODE WILL ONLY FUNCTION ON A LINE BY 
LINE BASIS. 

2. COMMANDS RELATED TO VERTICAL AND HORIZONTAL TABS CAN 
ONLY BE ISSUED AFTER A LINE TERMINATOR, 

3, ANY LINE WITH A COMMAND IN IT WILL BE PRINTED FROM 
LEFTY TO RIGHT, 

4. ANY LINE WITH ELONGATED PRINTS IN IT WILL BE PRINTED 
AT THE LOW PRINT RATE 

5. MEMORY AVAILABLE FOR DOWN LINE LOAD IS FROM 240 TO 
377 AND 2000 TO 3770 IN RAM, 

6. DOWN LINE LOADEO CHARACTER GENERATOR SHOULD 
BE STARTING ADDRESS (2000)8 SO AS NOT TO INTERFERE 
WITH BUFFER, 

7. PLOTTING MODE WILL ONLY FUNCTION ON A LINE BY 
LINE BASIS, THE LINE HAS TO BE TERMINATED TO 
BE PRINTED. 


POWER FAIL 

THE BUFFER WILL BE LOST ON A POWER FAIL ANO THE PRINTER 
WILL GET INITIALIZED 10 SWITCH CONFIGURATION ON 
RESUMPTION OF POWER. 


MACHINE CONFIGURATION 
MACHINE CONFIGURATION IS ONLY MONITORED ON AN INITIALIZE 
OR WHEN THE PRINTER IS OFF LINE. 


UNEXPECTED MOVEMENT OF THE PRINT HEAD 

IF THE PRINT HEAD IS MOVED BY HAND OR IT DOES NOT STOP Al 
THE POSITION IT WAS SUPPOSED TO BECAUSE OF OVERSHOOT THEN 
THE HEAD WILL REINITIALIZE USING THE HOME FLAG BEFORE 
PRINTING THE NEXT CHARACTER AT ITS CORRECT PLACE. 


1/2 DUPLEX MODE 


THIS MODE WILL CAUSE THE CHARACTERS BEING TRANSMITTED 
TQ THE HOST TO BE ECHOED ON THE PRINTER. 


PRINTER OPERATION 


0007 
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PRINTING AT LOW SPEED STARTS AS SOON AS A CHARACTER IS 
RECEIVED, AFTER THE FIRST LINE IS PRINTED THE PRINTER 
SPEED IS INCREASED TO 180 CPS. 


SELF TEST 


OPERATION OF SELF TEST MODE 


1. 
2. 
3. 


MASTER RESET PRINTER 

SELECT OFF LINE " 

SELECT MACHINE CONFIGURATION ON CONTROL 
PANEL 6 OR & LINES COMPRESSED OR REGULAR 
PRINT AUTO SKIP ON/OFF FORM LENGTH THEN 
PRESS TOP OF FORM INITIALIZE 

TURN ON SELF TEST SWITCH 

SELECT ON LINE 

PRINTER WILL THEN BE IN SELF TEST MODE 
MASTER RESET TO GET OUT OF SELF TEST 

IF AN OTHER MODE OF TEST IS DESIRED GO OFF 
LINE SELECT MODE GO BACK ON LINE. 


eENDC 


01 
02 
03 
04 
Qs 
06 
07 
08 
09 
10 
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000001 


00000! 


000000 
000001 
900002 
000003 


eNOCON 1 
1VOLO0 FOR PROTOTYPE # 1 
$CLEVER PRINTER PROGRAM 


TXT 1 

:SYMBOL DEFINITIONS 
MASK =0 

LI =1 

LO =2 

BBUF =3 


oy 


10009 LP2vi 

OL 

02 

03 

04 000066 
05 

06 000066 
07 00066 000001 
08 000067 
09 00067 000001 
10 000070 
11 00070 000001 
12 000071 
13 00071 000001 
14 

15 000072 
16 00072 000001 
17 000073 
18 00073 00001 
19 

20 000074 
21 00074 000001 
22 000075 
23 00075 000001 
24 

25 000076 
26 00076 000001 
27 000077 
28 00077 000001 
29 000100 
30 00100 000003 
31 000101 
32 00101 000001 
33 000102 
34 00102 000001 
35 

36 

37 000103 
38 00103 000001 
39 000104 
40 00104 000001 
41 000070 
4a 000105 
43 00105 000001 
44 000105 
45 000106 
46 00106 000001 
47 000107 
48 00107 000001 
49 

50 000110 
S1 00110 000001 
52 

53 000114 
54 00111 000001 
55 

56 000112 
57 00112 000001 
58 000113 
59 00113 000001 
60. ooorsa 
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tINITIALIZATION PUTS CONSTANTS IN LOCS 1 THROUGH END©INITA. 


«LOC 
sUNINITE 
RETA =. 

BLK 
RETS =. 

BLK 
VRTIN =, 

»BLK 
VRTWT =. 

«BLK 
VRTFL =. 

«BLK 
VSLEW =. 

«BLK 
VPOS =. 

BLK 
VRSTP 5. 

BLK 
DLLA =. 

«BLK 
OLLB =. 

«BLK 
OLLC =. 

BLK 
HPOS Ss. 

«BLK 
HSLEW =. 

-BLK 
TEMP1 Se 

BLK 
TEMPa =. 

oBLK 
TEMPS =SVRTIN 
SVEX =, 

«BLK 
TEMP =SVEX 
TEMPS =. 

BLK 
CHCNT =. 

«BLK 
BACK =. 

~BLK 
PRNTIN =, 

BLK 
PRCHR =e 

«BLK 
PRDOIR =. 

«BLK 
PRONT =, 


END=INITA+1 


1 
1 
1 


ALIZED VARIABLE SPACE IN PAGE 0 


RETURN ADDRESS MAIN LEVEL SUBROUTINES 


NUMBER OF VERTICAL INTERRUPTS EXPECTED 


tTHIS FLAG WILL BECOME 0 WHEN A VERTICAL 
sINTERRUPT IS EXPECTED 


3FLAG FOR VERTICAL STEP COMMAND 


sNUMBER OF VERTICAL STEPS TO BE TAKEN 
BEFORE PRINTING THE NEXT LINE 


sPOSITION OF FORMS IN FULL STEPS 


sCOUNT OF THE VERTICAL STEPS NEEDED FOR 
7A LINE FEED 


- tBYTE AQDRESS FOR DOWN-LINE=LOAD 


sBYTE COUNT, NEGATIVE 

7CHECK SUM 

sPOSITION OF CARRIAGE 
?OIRECTION AND NUMBER OF STEPS 


770 BE MOVED BEFORE PRINTING THE 
sNEXT CHARACTER 


s TEMPORARY STORAGE LOCATION 


sCOUNT OF THE CHARACTERS IN THE 
sLINE 


sCHARACTER TO BE PICKED WHILE GOING 
BACKWARD (RIGHT TO LEFT) 


sCOUNTER FOR THE NUMBER OF PRINT INTS. 
sRECEIVED 


7CHARACTER TO BE PRINTED 
tPRINT DIRECTION 
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0010 LP2ot 
Of 00114 000001 
02 000115 
03 00115 000001 
04 000116 
05 00116 000001 
06 

07 000117 
08 00117 000001 
09 

10 000120 
11 00120 000001 
12 000121 
13 00121 000001 
14 000122 
15 00122 000001 
16 000123 
17 00123 000001 
18 oo01a4 
19 00124 000001 
20 

a1 

22 

23 000125 
24 00125 000001 
25 000126 
26 00126 000001 
27 000127 
28 00127 0Gv001 
29 

30 

31 000130 
32 00130 000001 
33 000131 
34 00131 000001 
35 

36 

37 000132 
38 00132 000001 
39 

40 000133 
41 00133 000001 
42 000134 
83 60134 000001 
a4 

4s 000135 
86 00135 000001 
a7 

48 000136 
49 00136 000001 
50 

51 000137 
S2 00137 000001 
53 : 

Sa 

55 000140 
56 00140 000001 
57 

58 000841 
59 00141 000001 
60 


PRADR 


PRSKP 


PRTYP 


PFMD 


CMPMD 


ALTMD” 


LDSPC 


PSFLG 


LNCNT 
LNSIZ 
HRTER 


HSTFL 


STPFL 


DLLF 


VRTER 


OTSFL 


OLLSL 


OLADR 


OLFLG 


CMNDS 


CMNDE 
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»BLK 
»BLK 


BLK 


«BLK 


BLK 
BLK 
<BLK 
BLK 


BLK 


«BLK 


GENERAL CORPORATION, 


:COUNTER FOR PRINT STEP 
sADDRESS OF THE COLUMN TO BE PRINTED 


sWILL BE =i WHEN FIRST PRINT INTERRUPT 
sI1S TO BE SKIPPED WHILE PRINTING 


sFLAG FOR PRINT TYPE: BIT 0 WILL BE SET 
+FOR ELONGATED PRINT AND SIT 15 FOR COMP. 


sFLAG FOR PAPER OUT 
tFLAG FOR COMPRESSED MODE JUMPER 


FLAG FOR ALT MODE JUMPER 


sFLAG TO COLLECT THE HORIZONTAL POSITION 
30F THE LINE BEING SAVED IN THE PRINT 
SBUFFER WHEN THE PRINTER 1S ON*LINE 


:NUMBER OF LINES IN THE FORM 


sTHIS FLAG WILL BE NON 0 WHEN THE 
tHOR. MOTOR TAKES A STEP WITHOUT 
3A STEP COMMAND 


tFLAG FOR HORIZONTAL STEP COMMAND 
sTHIS FLAG WILL CONTAIN THE NUMBER 
:OF PRINT POSITIONS BEFORE THE MOTOR 
sHAS TO BE STOPPED 


7THIS LOCATION WILL BE NON O IF A 
*PROGRAM IS BEING DOWN LINE LOADED 


sCOUNTER FOR UNEXPECTED VERT. INT. 


:OUT3S COMMAND ISSUED AT ANY TIME WILL 
BE SAVED IN THIS LOCATION 


sFLAG TO INDICATE THAT CHARACTERS BEING 
7SAVED ARE DOWN LINE LOADED CHARACTERS 


tWELL CONTAIN THE ADDRESS WHERE THE DOWN 
tLINE LOADEO CHARACTER SET STARTS 


sCONTAINS THE ADDRESS OF THE LOCATION 
sWHERE THE DOWN LINE LOADED CHAR. SET 
MWILL START AFTER PRINTING THE CHARACTER 


sESCAPE COMMAND BEING SAVED WILL BE 
sSTORED HERE 


sESCAPE COMMAND BEING EXECUTED WILL BE 
?SAVEO HERE 
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00145 


00146 
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00150 


00151 
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900142 
000001 


o00143 
000001 
000144 
000001 


000145 
oo0001 


000146 
000001 


°000147 
000001 


000150 
000001 


OO01S! 
a0000% 


000152 
000001 


000153 
000001 
000154 
000001 


000155 
000001 


000156 
000001 


000157 
000001 
000160 
000001 
000161 
000001 


000162 
000001 


000163 
000001 


000164 
000001 
000165 
000001 
000166 
000001 


000167 


PLTFL 


PSPFL 
PLTSL 


VUFLG 


SCRFL 
SCOR 

SWTIM 
ESFLG 
ESFLi 
ESCMD 
ECMND 
PSADR 
CHADR 


OSRFL 
OTAST 


ELNEN 
ARGFL 
AUTSK 


DELAY 
VUTIM 
HTBFL 


HRCNT 


1979 


«BLK 


sFLAG TO INDICATE THAT CHARACTERS ARE 
?BEING SAVED FOR PLOTTING MOOE 


:SPECIAL FLAG FOR PLOT MODE 


?FLAG TO INDICATE THE PLOTTING MODE IS 
sSELECTED 


?NUMBER OF STEPS MOVED TO COMPLETE 
THE VIEW MOTION (0 WHEN. THERE HAS BEEN 
3NGQ MOVEMENT DUE TO VIEW) 


FLAG TO INDICATE THAT UNDER SCORING 
31S ENABLED OR DISABLED 


NON 0 WHEN THE CHARACTER BEING PRINTED 
tWILL BE UNDER SCORED 


3TIMER TO SEE IF IT IS TIME TO READ THE 
PANEL 


3FLAG INDICATING THAT AN ESCAPE COMMAND IS 
7BEING SAVED 


?FLAG INDICATING THAT AN ESCAPE COMMAND IS 
;BEING EXECUTED 


?BYTE ADDRESS IN THE FIFO WHERE THE FLAG 
3FOR THE ESCAPE COMMAND WILL BE SAVED 


BYTE ADDRESS OF THE BYTE WHERE THE LINE 
SIZE WILL BE SAVED 


sADDRESS OF THE BYTE COLLECTING THE 
sNUMBER OF CHARACTERS IN A LINE 


+TIME OUT FLAG FOR DATA SET 
+TIME FOR DATA SET DISCONNECT 


sFLAG TO REMEMBER IF THE CHARCTERS ARE 
#70 BE PRINTED IN ELONGATED MODE 


#FIRST BYTE OF TWO BYTE ARGUMENT WILL BE 
3SAVED HERE 


}WILL BE NON ZERO WHEN AUTO SKIP 
sFEATURE IS ENABLED 


DELAY FOR STOP COMMAND 


FLAG TO INDICATE THAT SLEW STEPS ARE 
sBEING TAKEN DUE TO A TAB 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 
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0012 LP20) 
01 00167 000001 
o2 

03 

oa 

os 000170 
06 00170 000001 
07 000171 
08 00171 000001 
09 

10 000172 
11 00472 000001 
12 000173 
13°00173 000001 
14 000174 
15 00174 000001 
16 

17 000175 
18 00175 000001 
19 000176 
20 00176 000001 
ai 000177 
22 00177 000001 
23 000200 
24 00200 000001 
es 000201 
26 00201 000001 
27 000202 
28 00202 000007 
29 

30 

31 o00et1 
32 00211 000011 
33 

34 


RETRY 


RTSVO 


RTSV3 
RTCRY 


RTCSV 


STFLG 
BUFST 
LTOFL 
TBFL 
BYFLG 
VTAB 


HTAB 


1979 
«BLK 


BLK 
«BLK 


~BLK 
BLK 


. 
Q 
rc 
rad 


@e We Ws we Se De 
| oat Cc - ~ Cc 
x za x xz az 


r 
x 


e BLK 


i 


i 


sLOCATION WHERE THE NUMBER OF REAL TIME 
7CLOCK INTERRUPTS RECEIVED WHILE THE 
sHORIZONTAL MOTOR WAS STEPPING WILL BE 

3s SAVED 

sNUMBER OF RETRYS MADE TO STEP THE MOTOR 


+LOCATION TO SAVE ACO WHEN A REAL TIME 
sCLOCK INTERRUPT IS RECEIVED 


3SAVE ACS ON A RTC INT. 
:SAVE CARRY ON A RTC INT. 


sHORIZONTAL COMMAND THAT FAILED WILL BE 
3SAVED HERE 


sSELF TEST FLAG 


“}BUSY BUFFER 


sLINE FLAG FOR ON LINE 

3STATUS OF TABS 

sBUSY FLAG 

?BLOCK TO SAVE VERTICAL TAB POSITIONS, 
sEACH BIT REPRESENTS ONE LINE FEED. 

7BIT 15 IS THE LOW ORDER BIT 

sBLOCK TO SAVE HORIZONTAL TAB POSITIONS, 


TEACH BIT REPRESENTS ONE PRINT POSITION. 
7(BIT 15 IS THE LOW ORDER BIT). 


PRUPRIETARY INFORMATION OF DATA GENERAL CORPORATION, PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 
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$0013 LP201 $0014 LP201 
01 061401 «DIAC PSHA=061401 01 040000 «LOC 40000 
02 061601 eOTAC POPA=061601 02 7LOW END OF ROMS 
03 061001 eDIAC MTSP=061001 03 
04 060001 «DIAC = MTFP=060001 04 BEGIN HERE WHEN POWER COMES UP (HALT, INTERUPT, JMP 1) 
os 061201 eDIAC = MFSP=061201 05 40000 040401 BEGIN: STA Oreti RESET INTERRUPT FLOP THIS STA WILL 
06 060201 eDIAC MFFP=060201 06 ?DECODE INTO AN OUT ZERO 
07 071077 eDUSR RCTEN=71077 07 
08 065077 -OUSR RTCOS=65077 08 40001 030441 LUA 2,RTOP 
09 073301 eDUSR MUL=073301 09 40002 126000 ADC l,l 
10 073101 -DUSR DIV=073101 10 40003 034523 LDA - 3,CPO tINITIALIZE PAGE 0 
Mi 062401 «DUSR SAV=062401 i 11 40004 021377 INILP: LDA O,-1,2 
12 062601 »DUSR RET=062601 12 40005 041400 STA 0,0,3 
13 100010 eOXOP TRP=100010 13 40006 133000 ADD 1r2 
14 14 40007 137004 ADD 1,3,S2R 
15 15 40030 000774 JMP INILP 
16 ‘ TUNINITIALIZEO VARIABLE SPACE NOT IN PAGE 0 16 3GET -1 IN RAM TOP 40 WORDS (37703777) 
17 000400 «LOC 400 : 17 40011 030034 LDA 2,C10 zAC2 = 10 
18 00400 000010 BIFOA: .BLK 20/2 18 40012 046024 STA 1,MAUTIN sAUTOINC, INITIALLY HAS 3767 IN IT 
19 00410 000400 BIFOB: .B8LK 1000/2 19 40013 172004 ADC 3,2,SZR ;SKIP AFTER CLEARING THE. TOP TEN 
20 ‘;WORDS OF THE RAM 
21 40014 000776 gMP m2 
22 40015 020567 LDA 0,STAK 
23 40016 061001 MTSP 0 sINEIT. THE STACK 
24 40017 020031 LDA 0,C377  ;ACO = 377 
es OUT 0,603 sCLEAR INTERRUPTS 
26 40020 034046 LDA 3, ePOUT+6 
27 40021 117000 ADO 0,3 
28 40022 041400 STA 0,0,3 
29 IN 0,2 #CLEAR THE FIFO 
30 80023 022012 LOA 0,0.PIN+2 
31 40024 020052 LDA 0,C40 #GET STATUS BIT FOR RUN LITE 
32 OUT 0,203 3SET RUN LITE BEFORE STEPPING MOTOR 
33 40025 030042 LDA 3, POUT+2 
34 40026 117000 A0D 0,3 
35 40027 041400 STA 0,0,3 
36 PULSE 3 sOISABLE THE PRINT HEAD INTERRUPTS 
37 40030 042043 STA 0,0,POUT+3 
38 40031 034475 MRST2: LDA 3,CP0 sAC3 = ADDRESS ANO NUMBER OF PAGE 
39 30 LOCATIONS TO BE CLEARED 
40 40032 164520 NEGZL 3,1 
41 40033 175400 INC 3,3 
42 40034 051400 STA 250,73 sINITIALIZE MEM, LOCATIONS 
? 43 40035 125404 Inc 1,1,S2R 
44 40036 000775 JMP ond 
45 40037 006551 JSR @POFLNL ;INIT THE MACHINE STATUS 
46 40040 006004 JSR ORINIT START INITIALIZING THE PRINT HEAD 
47 40041 000777 JMP ool 


48 40042 043000 RTOP: INITA+RET 


PRUPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 
COPYRIGHT DGC, 1979 
10015 LP201 


OL INIT? sSUBROUTINE TO INITIALIZE THE HEAD 

02 ’ 

03 40043 054070 STA 3, TEMPS ;SAVE THE RETURN ADDRESS 

04 IN 1,1 : 

05 40044 026011 LDA 1,2.PIN+1 

G6 40045 12511e MOVL# 1,1,SZ2C ;SKIP IF AT HOME 

07 40046 000410 JMP LFTIN 

08 40047 006057 JSR @PDECS ;TAKE INCREMENTAL STEPS TO THE RIGHT 
09 40050 040043 PINITs INIT 

10 40051 004431 JSR INTRT sNEXT TIME RETURN .+1 

ii IN 1,1 . 

12 400S2 026011 . LDA 1,0.PIN+) 

13 40053 125113 MOVL# 1/1,SNC SKIP AFTER GOING OUT OF HOME 
14 40054 000427 JMP INTRT+1 sRETURN 

15 40055 006055 . JSR @PSTOP sSTOP THE HORIZONTAL MOTOR 

16 40056 006056 LFTIN: JSR @PSTEP ;sMOVE TO THE LEFT AT HIGH SPEED 
17 400S7 004423 JSR INTRT 

18 IN Ort sREAD THE HOME FLAG 

19 40060 022011 LOA Ord.PINeL 

20 40061 101102 MOVL 0,0,SZ2C sSKIP AFTER REACHING HOME 

21 40062 000421 JMP INTRT+1 

22 40065 060277 INTOS g 

23 40064 054317 LDA 3,PRTYP :GET THE PRINT TYPE (REGULAR OR 
24 + sCOMPRESSED) 

25 40065 024037 LOA 1,Ci5 ACL = 15 

26 40066 175213 MOVRA 3,3,SNC ;SKIP IF COMP. PRINT MODE 

27 40067 024034 LOA 1,C10 

28 40070 044102 STA 1,HSLEW 

29 40071 044101 STA 1,HPOS 

30 40072 004410 JSR INTRT AFTER STOPPING THE MOTOR RETURN 
3t e+1 TO START SLEW MOTION 

32 40073 050127 STA 2,HRTER 30 OUT THE HOR, ERROR FLAG 

33 40074 034754 LOA 3,PINIT 

34 40075 054004 STA. 3,RINIT 

35 40076 010113 1SZ . PRDIR +SKIP IF PRINTING WAS TQ THE LEFT 
36 40077 000571 JMP RITPR 

37 40100 120400 NEG 1,0 

38 20101 000570 JMP LFTPR SLEW & THEN PREPARE TO PRINT TO 
39 +THE LEFT 

40 40102 054004 INTRTS STA 3,RINIT 

41 40103 034036 LDA 3,013 2AC3 = 13 

42 40104 060277 INTDS 

43 40105 020134 LOA 0,OT3FL 

44 40106 163400 AND 3,0 sMASKOUT BIT 13 

4S 40107 0420134 STA 0,OT3FL 

46 40110 060177 INTEN 

47 40%11 002070 IMP @TEMP3 sRETURN 

48 40412 024074 VRTTBs LDA 1,VPOS ;GET THE VERTICAL POSITION 

49 80413 030075 LDA 2,VRSTP 

50 40114 073101 OIV 

S51 40115 006474 JSR @PTBCAL 3GO CALCULATE POSITION 

52 40116 000202 VTAB- FOR NEXT VERTICAL TAB 

53 40117 000007 7 

54 40120 125005 MOV 1,1,SNR sSKIP IF SOME STEPS REQUIRED 

55 40821 000455 * MP CARIG 

56 40122 030075 LDA 2,VRSTP 3;GET NUMBER OF STEPS PER LINE 
57 40123 073301 MUL sCALCULATE NUMBER OF STEPS 
$8,40124 121000 MOV 1,0 sFOR VERTICAL TAB 

59 40125 000450 JMP VUCNST 


>. 


PROPRIETARY INFORMATION OF DATA 
COPYRIGHT OGC, 1979 

$0016 LP201 

01 40126 000066 CPO: RETA 


GENERAL CORPORATION, 


Q2 40127 034024 PFSS: LDA 3,FRMFL 3GET STATUS OF FORM LENGTH 

03 40130 175005 MOV 3,3,SNR ;SKIP IF SOME FORM LENGTH IS SET 

04 40131 000445 JMP CARIG 3NO FORM LENGTH SET 

0S 40132 143000 SKAU: ADD 2,0 :SET UP NUMBER OF STEPS 

06 40133 000442 JMP VUCNST 3:GO TAKE STEPS 

07 40134 030555 LDA 2,€3000 sAC2 IS APROX, 3000 

08 40135 050150 STA 2,SWTIM sDISABLE THE LINE FEED AND FORM FEED 
09 sSWITCHES FOR SOME TIME 

10 NXTLNS sENTER TO PROCESS THE NEXT LINE 

11 40136 115004 MOV 0+3,SZR ;SKIP IF MOTOR HAS STOPPED 

312 40137 000562 SMP STP1 

13 40140 152000 ADC ere. 

24 40141 050063 STA 2,CHROY sRESET THE CHARACTER READY FLAG 

15 40142 030024 LDA 2,FRMFL :ACO = FORMS? COUNT 

16 40143 034074 LOA 3,VPGS ;AC3 = VERT. POSITION 

17 40144 156443 SUBO 2/3,SNC sSKIP IF VERTICAL POSITION HAS NOT 
18 #GONE OVER THE TOP OF FORM 

19 40145 054074 STA 3,VPOS 

20 40146 020036 LDA 0,Ci3 

21 40147 122405 SUB 1,0,SNR :SKIP IF NOT VERTICAL TAS 

22 

23 40150 000742 SMP VRTTB 

24 40151 125202 MOVR 1,1,S2C SKIP IF NOT A "CR" 

25 40152 000424 JMP CARIG 

26 40153 o20024 LDA 0, FRNFL 

27 40154 101005 MOV 0,0,SNR ;SKIP IF NO FORMS OPTION 

28 40155 000410 SMP PFSSI +NO FORMS 

29 40156 034074 LDA 3,VPQS ;AC3 = VERTICAL POSITION 

30 40157 030163 LDA 2,AUTSK ;:GET THE NUMBER OF STEPS TO BE TAKEN 
31 ; 3FOR AUTO SKIP MODE 

32 40160 175000 ADO 3,2 

33 40161 112440 suBO 0,2 :SET CARRY TO 0 IF AUTO SKIP IS DESIRED 
34 40t62 030075 LDA 2,VRSTP 

35 40163 162402 Sus 3,0,SZC ;SKIP IF AUTO SKIP 1S DESIRED 

36 40168 000746 JMP SKAU 

37 40165 125203 PFSSI: MOVR 1,1,SNC sSKIP IF NOT FORM FEED 

38 40166 000741 JMP PFSS 

39 40167 020075 LDA 0,VRSTP ;ACO = NUMBER OF STEPS TO BE TAKEN 
40 FOR A LINE FEED 

41 40170 034143 LOA 3,PSPFL ;READ THE PLOTTING MODE SELECT SWITCH 
42 40171 175004 MOV 3,3,SZR sSKIP IF PLOTTING MODE IS NOT SELECTED 
43 40172 020006 LOA 0,CS ;ACO = NUMBER OF STEPS FOR PLOT 

44 40173 176400 SUB 3,3 CLEAR AC3 ‘ 
4S 40174 054143 STA 3,PSPFL :CLEAR PLOT STATUS 

46 40175 006426 VUCNST: JSR OPVSTP 

47 40176 024101 CARIG: LDA 1,HPO0S GET THE HORIZONTAL POSITION 

48 40177 010177 sz LTOFL sSKIP IF ON LINE 

439 40200 000470 IMP RITPR sINITIALIZE THE CARRIAGE 

SOQ 40201 014062 0sz LINES #DECEREMENT LINE NUMBER COUNTER 

Si 40202 000401 SMP oti sIGNORE THE SKIP 

52 40203 006411 JSR @PGET LOAD ACO WITH THE NUMBER OF LEADING 
33 sSPACES, RETURN .+3 


54 40204 000225 STAK: 2e5 
55 40205 000021 Cel: cay 
56 40206 040106 STA 0, TEMPS 


S58 40207 006405 JSR OPGET 


t TEMPORARILY SAVE THE NUMBER OF LEADING 
SPACES 

LOAD ACO WITH THE ESCAPE COMMAND FLAG 
117 WILL BE 0 IF THERE 18 NO COMMAND IN 
sTHE LINE 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 


COPYRIGHT OGC, 1979 COPYRIGHT OGC, 1979 
OO17 LP201 0018 LP201 
O1 40210 042432 POFLNI: OFLNI 01 sCURRENT HORIZONTAL POSITION 
02 40211 041130 PTBCAL: TBCAL 02 46260 175102 MOVL 3,3,8Z€ ;SKIP IF THERE ARE MORE LINES IN THE 
03 40212 040103 STA 0,TEMP1 TEMPORARILY SAVE ESC. COMMAND FLAG 03 7PRINT BUFFER OR THERE 1S NO ESCAPE 
04 40213 006401 JSR APGET ;LQ0AD ACO WITH THE NUMBER OF CHARS. 04 3:COMMAND IN THE LINE 
0S 2IN THE NEXT LINE, RETURN .+3 0S 40261 000407 JMP RITPR sNEXT LINE 1S TO BE PRINTED LEFT 
06 40214 041035 PGET: GET 06 ?TO RIGHT 
07 40215 000101 C100: 101 sNEVER RETURN HERE (EVERY “RETURN 07 40262 020102 LDA O,HSLEW ACO = FINAL POSITION OF THE LINE 
08 sAND NEW LINE WILL BE FOLLOWED 08 40263 142400 SuB 2,0 sACQ = TOTAL NUMBER OF PRINT COLUMNS 
09 7BY FOUR BYTES OF LOOK AHEAD INFOR- 09 sOCCUPIED BY THE CHARACTERS IN THE LINE 
10 +MATLION) 10 40264 106052 ADCO# 0,1,SZC :SKIP IF THE NUMBER OF CHAR, IN 
11 80216 024007 LDA 1,0332 ;sAC1 = 132 1t sTHE LINE ARE LESS THAN THE CURRENT 
12 40217 106452 SUBO# O,1,SZC SKIP IF THE SIZE OF THE NEXT LINE 12 sHORIZONTAL POSITION 
13 sIS NOT OVER 132 COLUMNS 13 40265 101400 INC 0,0 IF THE NEXT LINE HAS TO START AT 
14 ao220 121000 MoV 1,0 14 sTHE CURRENT PRINT POSITION, UR IF 
15 40221 040102 STA O,HSLEW sSAVE THE PRINTABLE SIZE OF NEXT LINE 15 :THE HEAD IS TO MOVE TO THE RIGHT 
16 40222-006772 JSR OPGET 7GET THE NUMBER OF PRINTABLE CHARACTERS IN 16 ;THEN TAKE ONE EXTRA SLEW STEP 
17 sIN THE LINE, RETURN .+3 17 40266 122440 SuBO 1,0 sCARRY = 1 IF ACO < ACS IN WHICH 
18 40223 042323 PVSTP: VRSTJ 18 #CASE ACO WILL BECOME -IVE; OTHER] 
19 80224 041014 PPRBG: PRBG 19 sWISE CARRY = 0 AND ACO WILL BE +IVE 
20 40225 104000 com Ori 20 40267 106413 SUB# O,t,/SNC°:SKIP IF MOVING THE PRINTER TO THE 
21 40226 044110 STA 1,BACK 21 sRIGHT IS INEFFICIENT 
22 40227 034161 LDA 3,ELNEN 3AC3 = PRINT TYPE 22 40270 120401 RiITPR: NEG 1,0,SKP 
23 40230 030106 LDA 2,TEMPS :AC2 = NUMBER OF LEADING SPACES 23 40271 176001 LFTPR: ADC 3,3,SKP :AC3 = -1 
24 40231 024007 LDA 1,0132. sACC1 = 132, 24 40272 176520 SUBZL 3,3 7AC3 = 1 
25 40232 146443 SUBO 2,1,SNC ;SKIP IF NUMBER OF LEADING SPACES IS 25 40273 054113 STA 3,PRDIR :"PROIR" WILL BE 1 IF THE PRINT 
26 7GREATER THAN 132 26 7DIRECTION IS GOING TO BE RIGHT AND 
27 40233 000403 JMP ot3 e7 sel IF IT IS GOING TO SE LEFT 
26 40234 133000 ADD 1,2 28 40274 126400 VURST: SUB 1,1 
29 40235 126400 SUB 1,1 29 4027S 044170 STA {,RETRY sCLEAR THE ERROR FLAG FOR RETRYS 
30 40236 175112 MOVLA 3,3,SZC ;SKIP IF NOT ELONGATED MODE 30 40276 044145 STA 1,VUFLG ;CLEAR THE FLAG TQ INDICATE THAT 
31 40237 101120 MOVZL . 0,0 sMULTIPLY THE NUMBER OF CHARACTERS 31 sVIEW HAS TAKEN PLACE 
32 sIN THE LINE BY 2 32 40277 024676 LOA 1,VUCNST +GET THE VIEW CONSTANT 
33 40240 106452 SUBO4 Ort,SZC sSKIP IF THE CHARACTERS WILL NOT CAUSE 33 40300 044165 STA 1,VUTIM sINIT THE VIEW TIMER 
34 rLINE TO GO OVER 132 COLUMN 34 40301 105102 VUSLU: MOVE 0,1,SZC ;SKIP IF SLEW DIRECTION IS TO 
3S 40241 121000 MOV 1,0 35 :THE RIGHT 
36 40242 175112 MOVL#8 3,3,SZC ;SKIP IF NOT ELONGATED 36 40302 100400 NEG 0,0 sACO = NUMBER OF SLEW STEPS 
37 40243 101220 MOVZR 0,0 sDIVIDE BY 2 37 40303 126200 ADCR 1,1 sAC1 IS ~1 IF SLEW DIRECTION IS TO 
38 40244 024144 LDA 1,PLTSL sAC1 = 0 IF PLOTTING MODE NOT SELECTED 38 sTHE LEFT AND 77777 IF IT IS TO THE 
39 7& #f IF IT IS SELECTED 39 RIGHT 
40 40245 125223 MOVZR 1,1,SNC 40 40304 136415 SubA 1,3,SNR :AC3 WILL ONLY BE 0 WHEN BUTH 
41 40246 024103 LDA 1,TEMP1 ;GET THE ESC. COMMAND FLAG at sSLEW AND PRINT WILL BE IN THE 
42 40247 125235 MOVZR# 1,1,SNR ;SKIP IF THERE 1S A COMMAND TO 42 sREVERSE DIRECTION, IN WHICH CASE 
43 , sENABLE THE ELONGATED PRINT IN a3 +THE SLEW STEP HAS TO BE REDUCED BY 1 
44 +THIS LINE 44 40305 163000 ADD 3,0 
4S 40250 040107 STA O,CHCNT ;NUMBER OF PRINTABLE CHARACTERS IN 45 40306 040102 STA O,HSLEW ;SAVE THE NUMBER OF HORIZONTAL 
46 sTHE LINE 46 ;SLEW STEPS 
47 40251 134445 NEGO 1,3,SNR sSKIP IF THERE IS A ESCAPE COMMAND 47 40307 111005 MOV 0r2,SNR ;SKIP IF SOME SLEW STEPS ARE TO 
48 sIN THE LINE AND PREPARE TO PRINT 48 3BE TAKEN 
49 sLEFT TO RIGHT 49 40310 000560 JMP SCAN g 
50 40252 034062 LDA 3eLINES sAC3 = NUMBER OF LINES IN THE SO 40311 002713 C3000: JMP @PPRBG 
Si +BUFFER Sti ; 
S52 40253 165100 MOVL: 3,1 7IF THERE ARE NO MORE LINES IN THE S2 40312 024130 SLCHK: LDA 1,HSTFL 3GET THE LAST HORIZ. STEP THAT 
53 sPRINT BUFFER THEN MAKE THE CARRY 1 53 7WAS ISSUED 
54 40254 101105 MOVL 0,0,SNR s:SKIP IF THERE ARE SOME PRINTABLE S4 40313 030005 LDA 2eC4 sAC2 = 4 
55 sCHARACTERS IN THE LINE OR THIS IS THE SS 40314 147404 AND 2,1,8Z2R ;SKIP IF MOVING TO RIGHT 
56 sONLY LINE IN THE BUFFER 56@ 40315 126000 ADC 171 sACL = @1 
57 40255 000415 JMP LFTPR+1 57 40316 034033 LDA 3,C7 sAC3 = 7 
58, 40256 024101 LDA 1,HPOS ;GET THE HORIZONTAL POSITION 58 40317 116443 SUBD 0,3,SNC :SKIP IF MORE THAN 7 CHARS. POSITIONS 
S9 40257 146426 SUBZ 2/1,SEZ sSKIP IF THE NUMBER OF LEADING s9 sLEFT IN THE SLEW MOTION 
60 sSPACES IS EQUAL OR MORE THAN THE 60 40320 006057 JSR @PDECS sSTART SLOW STEPS AND RETURN 


— 


0019 OL 


01 
02 
03 
04 
05 
06 
07 
08 
09 
10 
11 
le 
13 
14 
15 
16, 
17 
18 
19 
20 
at 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
a1 
42 
43 
44 
45 
a6 
47 
48 
49 
50 
51 
52 
53 
54 
55 
56 
57 
58 


40321 


40322 
40323 


40324 


40325 
40326 
40327 
40330 
40331 
40332 
40333 
40334 


40335. 


40336 
40337 
40340 
50341 
40342 
40343 
40344 


40345 
40346 
40347 
40350 
40351 
40352 
40353 
40354 


40355 
40356 
40357 
40360 


40361 
40362 
40363 
40364 
40365 


40366 


40367 
40370 
40371 
40372 
40373 
40374 
40375 
40376 
40377 
40400 
40001 
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COPYRIGHT DGC, 
Peot 
111004 STPi: 


030005 
OS0L31 


000s44 


040134 PNxTs 
044177 LNFRIs 
132043 
000513 
175213 
125521 
1751143 
002771 
000507 
050120 HDINTs 
000404 
020030 SNBYA: 
040176 
152001 SNBYs 
030031 
050201 
SERYYs 
022014 
030065 
143404 
001400 
020436 
030201 
151005 
020631 


030041 
113000 
041000 
001400 
DSCNCTs 
034160 
175005 
034556 
178405 
054157 


054160 

OTWO: 
030042 
113000 
041000 
030623 
112404 
000474 
102400 HELP: 
006055 
004743 
020615 
000766 


59 40402 
60 40403 


020402 
000764 


RTSNOD: 


1979 
MOV 


LOA 
STA 


JMP 


NXTLN=2 
STA 
ADCcO 
JMP 
MOVR# 
INCZL 
MOVL# 
JMP 
JMP 
STA 
JMP 
LDA 
STA 
ADC 
LOA 
STA 
IN 
LDA 
LDA 
AND 
JMP 
LDA 
LDA 
MoV 
LDA 
our 
LDA 
ADD, 
STA 
JMP 
eKCOME 
LDA 
MoV 
LOA 
INC 
STA 


STA 
out 
LDA 
ADO 
STA 
LDA 
sua 
JMP 
SuB 
JSR 


’ JSR 


LDA 
JMP 


LDA 
UMP 


0,2,8ZR 


2,ca 
2,STPFL 


SCAN 


1,LTOFL 
Le2,SNC 
LNFR2 
3,/3-SNC 
1+1,SKP 
3,3,-S5NC 
@PNXT 
LNFR2+1 
2,PFMD 
SNBY+1 
0,C1000 
0,BUFST 
222,SKP 
2,C377 
2,BYFLG 
0,4 


GENERAL CORPORATION, 
COPYRIGHT DGC. 1979 
0020 LPeo! 
7SKIP IF THE HORIZONTAL MOTOR IS NOT 01 40404 000074 C76: 74 
+ STEPPING G2 40405 000057 C57: 57 
03 40406 000174 Dias: 124, 
sPREPARE TO SLOW DOWN AND STOP AFTER 04 80407 000023 C23: 23 
74 PRINT POSITIONS OS 40410 000076 C74: 76 
06 40411 041231 PROTTD? RDTTO 
07 404%2 042644 PTESTs TESTS 
08 80413 042630 PBELL: SELL 
sPRETEND TO BE OFF LINE 09 40414 040340 SNBYZ: SNBYA 
sSKIP IF THE COUNT WAS 0 10 40415 000046 C44; 46 
11 40416 041035 GET4: GET1 


sCONSTANTS 


3SKIP IF NEW LINE IS NOT DESIRED 
z7AC1 = 2 
2SKIP IF FORMFEED IS NOT DESIRED 


3SET STATUS OF OUT OF FORMS 
sSEND BUSY TO HUST 
3SET COUNT FOR BUFFER CLEAR 


sMAKE AC2 EQUAL TO 1 
sMAKE AC2 = 377 
3SET BUSY FLAG 


0,3.PIN+G 


2,2 
2,0,SZR 
0,3 
0,Ce3 
2,BYFLG 


- 2,2,SNR 


0,Cel 
Orlr2 


SKIP IF SOFEWARE BUSY 
SEND SOFTWARE BUSY TO HOST 


sTEST FOR CLEAR OR BUSY 
?SEND CLEAR 


2,.POUT+i 


0,2 
0,0,2 
0,3 
HERE TO 
3,0TAST 
3+3,SNR 
3,D08RTM 
3,3,S5NR 
3,OSRFL 


3,DTAST 
O,222 


sRETURN AFTER SENDING BUSY 
DISCONECT THE DATA SET : 
3GET THE DATA SET TIMER 

+SKIP IF THE TIMER IS ON 
sPREPARE TO INIT THE TIMER 
;SKIP WHEN THE TIME IS OVER 
sPREPARE TO RETURN FOR ISSUING 
sANOTHER BREAK 


sISSUE A BREAK 


2,-POUT+2 


0,2 
0,0,2 
2,C100 
0,2,SZR 
SCAN 
0,0 
aPsTor 
SNBY 
0,C100 
OTWO 


0,C76 
OTWwO 


3GET ERROR STATUS 

3TEST FOR ERROR 

3NO ERROR RETURN TO SCAN 

CLEAR ACO 

:STOP THE MOTORS THIS 1S AN ERROR 
7SEND BUSY TO HOST THIS IS AN ERROR 
3GET ERROR STATUS 

SET ERROR LIGHT ISSUE BREAK 

RESET RUN LED ON CONTROL BOARD 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 


~ 


fooal 


OL 
02 
03 
04 
os 
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40417 
40420 


40a24 


40422 
40423 


40424 
40425 


40426 
40427 


40430 
40431 
40432 


40433" 


B0434 


40435 
40436 


40437 
40440 


4044} 


40442 
40443 
40444 


4044s 
40446 
40447 
40450 
40451 
40452 


40453 
40454 
4045S 
40456 
40457 
40460 
40461 


40462 
40463 
40464 
40465 
40466 
40467 


LP2ot 


034114 EMPTY: 
161004 


000447 


036014 
177320 


024165 
125006 


014165 
000410 


020033 
024101 
030754 
132442 
100000 


o4014s 
000643 


024073 LNFRMS 
030150 


125005 


0006648 
050150 LNFR2: 
030130 


151005 
000422 
0060S5 
065077 
020107 
101005 


024031 
000417 
020201 OFLST=: 
101015 
004664 
020735 
000425 


102400 SNCL: 
040201 

040120 

004660 

000402 

040152 ESCST: 


1979 


LDA 
MOV 


JMP 

IN 
LDA 

ADOZS 


LOA 
MOV 


0SZ 
JMP 


LDA 
LOA 
LDA 
SuBO 
coM 


STA 
JMP 


LDA 
LDA 


MOV 


JMP 
STA 
LDA 


MOV 
JMP 
JSR 
RTCOS 
LOA 
MOV 


LDA 
JMP 
LDA 
MOVE 
JSR 
LOA 
JMP 


SUB 
STA 
STA 
JSR 
SMP 
STA 


3,PRCNT 
3,0,SZR ;SKIP IF PRINTING OF THE LAST 
sCHARACTER IS OVER 


SCAN 

344 

3,O.PIN+4 

3,3 sLOAD CARRY WITH 1 IF VIEW MODE IS 


sENABLED, 0 OTHERWISE 

1,VUTIM sAC) = VIEW TIME 

1,1,SEZ ;SKIP IF NO VIEW OESIRED OR THE VIEW 
sMOTION HAS ALREADY TAKEN PLACE 


VUTIM ;SKIP IF TIME TO MOVE FOR VIEW 

LNFRM ?OTHERWISE GO TO CHECK FOR LINE FEED 
30R FORM FEEO SWITCHES 

0,C7 3ACO = 7 

1,HPOS READ THE HORIZONTAL POSITION 

2,0328 ;AC2 = 128. 

1,2,SZC ;SKIP IF LESS THAN 128. 

0,0 sOTHERWISE VIEW MODE WILL MOVE THE 
CARRIAGE TO THE LEFT 

0, VUFLG 

VUSLU 

1,VSLEW 


2,SWTIM ;READ THE SWITCH COUNT, IT HAS TO 
“ 3BE 0 FOR THE SWITCH TO BE READ 
1,1,SNR ;SKIP IF VERTICAL MOTION IS TAKING 
PLACE 
LNFRi 
2,SWTIh 
2,HSTFL 3GET THE LAST HORIZONTAL COMMAND THAT 
sWAS ISSUED 


“2/2,SNR ¢SKIP IF THE MOTOR IS MOVING 


SCAN 

@PSTOUP +;STOP THE MOTOR 

sOISABLE THE REAL TIME CLOCK 

O,CHCNT sSEE IF CHARACTERS ARE IN BUFFER 

0,0,SNR ;SKIP IF THE STOP WAS ISSUED BECAUSE THE 
sPRINTER WENT OFF LINE WHILE IT WAS 
sPRINTING THE CHARACTERS ON LINE 

1,C0377 : 

SCAN+3 

0,BYFLG 

0,0,SNR :TEST IF BUSY IS SET 


SNBY+1 SEND BUSY TO HOST 
0,C44 sGET OFF LINE STATUS 
OFRET sRETURN TO SCAN 

0,0 ?CLEAR ACO 


0,BYFLG ;CLEAR BUSY FLAG 


O.PFMD ;CLEAR FORM ERROR 
SERBY 3GOQ CHECK ON WHICH CLEAR 
SCAN sRETURN TO SCAN 


0,ESFL1 :SET A FLAG TO INDICATE THAT AN 
sESCAPE COMMAND IS BEING DECODED 


o1 
02 
03 
o4 
os 
06 
07 
08 
09 
10 
11 
12 
13 


40470 
40471 
40472 


40473 
40474 
40475 
40476 
40477 
40500 
S050! 


40502 
40503 
40504 
40505 
40506 


40507 


40510 
40511 
40512 
40513 
40514 
40515 
40516 
40517 
40520 
40521 
40522 
40523 
40524 
40525 
40526 
40527 
40530 
40531 


40532 
40533 
40534 
40535 
40536 
80537 
40540 
40sai 


40542 
40543 
40544 
40545 
40546 


90547 
40550 
40551 
405S5e 
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0022 LP201 


176400 
024164 
166043 


044164 
014061 
006716 
010061 
030071 
1St224 
014075 


026014 
020705 
127103 
000750 
152200 


050104 


034177 
030031 
156414 
030104 
034063 
175405 
050177 
034175 
1751312 
020674 
034006 
030201 
151014 
162000 
030104 
034160 
175004 
020654 


034042 
117000 
041400 
135300 
175113 
000407 
034157 
175005 


175400 
175405 
000615 
054157 
147503 


000417 
034053 
020201 
117414 


SCAN: 


OFRET: 


OSRTM3 


SCANS: 


1979 


sLQOK FOR SOMETHING TO DU 


LOA 
ADCO 


STA 
0S2Z 
JSR 
182 
LOA 
MOVZR 
DSZ 


IN 
LOA 
LDA 
ADDL 
JMP 
ADCR 


STA 


LOA 
LDA 
Subs 
LDA 
LDA 
INC 
STA 
LDA 
MOVL# 
LOA 
LDA 
LDA 
MOVa 
ADC 
LDA 
LOA 
MOV 
LOA 
OUT 
LDA 
AbD 
STA 
MOVS 
MOVL& 
JMP 
LDA 
MOV 


Inc. 
INC 
JMP 
STA 
ANDL 


JMP 
LDA 
LDA 
AND& 


SUB 3,3 

1,DELAY 

3+1,SNC :SKIP IF DELAY STARTED AFTER 
:THE STOP COMMAND IS OVER 


1,DELAY 

BLCNT sSKIP IF THE BELL IS NOT TO BE RUNG 
@PBELL sRING THE BELL 

BLENT tMAKE IT 1 FOR NEXT TIME’S SKIP 
2,VRTWT 


2e2,SZ2R ;DECREMENT BUT DON'T MAKE IT NEGATIVE 


* YRTWT s"VRTWT" WILL BECOME 0 WHEN THE VERTICAL 
sWAIT IS OVER 
164 3GET THE STATUS 
1,0.PIN+4 
0,074 7ACQ = 74 


1,1,SNC :SKIP IF PRINTER IS ON LINE 

OFLST 7GO CHECK ON BUSY STATUS 

2.2 sAC2 = =t FOR ON LINE ANO 77777 FOR OFF 
LINE 

2,TEMP2-;TEMP2 WILL BE -1 FOR ON LINE, BIT 0 
;WILL BE 0 FOR OFF LINE 

3,LTOFL sLINE TERMINATOR STATUS 

2,C377 

2¢3,SZR 3SKIP IF TERMINATOR 

2,TEMPe ;GET ON/OFF LINE STATUS 

3,CHROY 

3,3,SNR ;SKIP IF READY TO PRINT CHARACTER 

2,LTOFL ;UPDATE TERMINATOR STATUS 

3,STFLG 3GET STATUS OF SELF TEST 

3,3,S2C s;SKIP IF NOT IN SELF TEST MODE 

0,Caa 3GET READY RUN LITE STATUS 

3,¢5 

2,BYFLG ;GET STATUS OF BUSY 

2,2,SZ2R ;TEST FOR BUSY 

3,0 IF BUSY MAKE STATUS RTS NOT READY 

2,TEMP2 ;RESTORE AC2 

3,0TAST ;CHECK IF BREAK WAS TAKING PLACE 

3,3,8Z2R 

0,CS7 

0,2-3 

3, .POUT+2 

0,3 

0,0,3 

1,3 

3,3,SNC ;SKIP IF ON LINE AND DSR IS NOT ZERO 

SCANS ‘ 

3,DSRFL ;GET THE DATA SET READY FLAG 

3,3,SNR ;SKIP IF NO CHARACTER HAS BEEN RECEIVED 
#SINCE THE TIMER STARTED 

3,3 sOTHERWISE LOAD THE VALUE OF THE TIMER 

3,3,SNR sSKIP IF THE WAIT TIME IS NOT OVER 

DSCNCT sDISCONNECT THE DATA SET 

3,0SRFL 

@eteSNC sCARRY = 0 IF NO CHARACTER TO GE 

READ OR IF OFF LINE 


SET BIT 15 FOR BREAK 


SCANO 
3,060 
0,BYFLG ;GET BUSY STATUS 
0,3,SZR ;TEST IF BUSY 


0023 LP2d! 
01 000410 
02 020022 
° 03 162023 
oq 006636 
os 006632 
06 000406 
07 042430 
08 040312 
09 
10 Q22014 
11 101203 
12 000772 
13 1497503 
1a 
15 000432 
16 127123 
7 000611 
18 "044066 
19 020031 
20 
et 036013 
22 175102 
23 os4201 
24 116415 
25 000662 
26 020175 
a7 101112 
28 006607 
29 034063 
30 
31 
32 
33 175415 
34 
35 
36 006610 
37 
39 
40 000412 
ai 024066 
42 125103 
43 000404 
a4 040063 
4s 034031 
46 OS4177 
47 2 
48 034041 
49 117000 
50 041400 
51 024166 
Se 020102 
53 125005 
54 
ss 101005 
56 000402 
S7 002734 
58 0246131 
59 40630 125004 
60 ‘40631 000637 


1979 


JMP 
LDA 
ADCZ 
JSR 
JSR 
SMP 
OFLNO 
SLCHK 
IN 
LDA 
MOVR 
JMP 
ANDL 


JMP 
AODDZL 
JMP 
STA 
LOA 
IN 
LDA 
MOVL 
LDA 
SUBA 
JMP 
LDA 
MOVLA 
JSR 
LOA 


INCH 


JSR- 


JMP 
LOA 
MOVE 
JMP 
STA 
LDA 
STA 
OUT 
LOA 
ADO 
STA 
LDA 
LDA 
MoV 


MOV 
JMP 
JUMP 
LDA 
MOV 
UMP 
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SCANG 

0,FEFOB+LO 

3,0,SNC ¢TEST IF FIFUB IS FULL 
@SNBYZ ;SEND BUSY TO HOST 
@PROTTO ;GO READ IN CHARACTER 


SCANO 
0,4 7GET STATUS 
0,d.PIN+4 


0,0,SNC ;TEST FOR SERIAL INTERFACE 

SCANS +SERIAL GO GET DATA 

@e1/¢SNC CARRY = 0 IF THE UART IS BUSY OR OFF 
sLINE, 1 OTHERWISE 

SCAN1 

1,1,SNC ;SKIP IF CLEAR TO SEND 

RTSND sREQUEST TO SEND 

1,RETA sTEMPORARILY SAVE THE ING 

0,C377 

3,3 

3,0,PIN+3 

3,3,S2Z2C ;SKIP IF OUT OF FORMS 

3,BYFLG ;GET STATUS OF BUSY 

0,3,SNR ;TEST TO SEE IF BUFFER WAS FULL 

SNCL sSEND CLEAR TO HOST 

0,STFLG ;GET STATUS OF SELF TEST 

0-0,SZC sSKIP IF NOT IN SELF TEST 

OPTEST $PUT DATA IN FIFOB 

3,CHROY sAC3 WILL HAVE THE CHARACTER BEING 
sPRINTED OR +1 IF NO CHARACTER IS 
tBEING PRINTED 


"3,3,SNR ;IF LOCAL COPY IS REQUIRED THEN CHECK 


;THE PRINT BUFFER TO SEE THAT IT CAN 
sACCEPT THE CHARACTER 

aGET4 sREAD THE CHARACTER FROM THE KEYSOARD 
sFIFO (FIFOA) IF CHARACTER IS AVAILABLE 
IN THE KEYBOARD FIFO THEN RETURN .+2 


SCAN1 

1,RETA sREAD THE SAVED ING 

1,1,SNC s;SKIP IF LOCAL COPY DESIRED 

SCOTH 

0,.CHRDY 

3.0377 

3,LTOFL ¢SET UP FOR LINE TERM 

0,1,3 :SEND CHAR TO HOST 

3, —POUT+1 

0,3 

0,0,3 

1,HTBFL 

0,HSLEW 

1,1,SNR ;SKIP IF SLEW MOTION IS QUE TO 
7A TAB COMMAND 

0,0,SNR s;SKIP IF SLEW STEPS ARE BEING TAKEN 

ot2 

@PSLCHK 

1,STPFL ras 

1-1,SZR s;WAIT FOR THE STOP COMMAND TO COMPLETE 

SCAN 


PROPRIETARY INFORMATION OF DATA 
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GENERAL CORPORATION, 


0024 LP20i 

OL 020063 LDA 0,CHRDY 

02 101414 Inc# 0,0,SZR ;SKIP IF THERE 1S ‘NO CHARACTER READY 
03 : . 3FOR PRINTING 

04 40634 000440 JMP GTITL 

os 151525 INCZL 2,2,SNR ;SKIP IF ON LINE 

06 006723 BLCNST: JSR @POQFLO $SET UP THE MACHINE STATUS & RETURN 
07 3.+8 

08 030107 LOA 2,CHCNT sAC2 = CHARACTERS LEFT IN THE LINE 
09 143043 ADDO 2,0,SNC ;DECREMENT BUT DON'T MAKE IT NEGATIVE 
10 040107 STA 0,CHCNT 

11 024113 LDA i1,PROIR ;AC1 IS =1 IF PRINT DIRECTION IS 

12 af ?TO THE LEFT AND 1 OTHERWISE 

13 125415 Inc# 1,i1,SNR ;SKIP IF PRINTING TO RIGHT 

14 000407 JMP LIFO LAST CHARACTER IN THE LINE WILL 

15 7BE PRINTED FIRST 

16 004566 JSR GET sL0AO0 ACO WITH A CHARACTER FROM 

17 :FIFOB RETURN .+2 OR .+3 

18 40646 004567 JSR GET1 7LOAD ACO WITH A CHARACTER FROM 

19 F tFIFOA 

20 40647 002554 JMP ®MEMPT1 3JUMP IF FIFO IS EMPTY 

21 40650 000412 IMP GOTIT 

22 040274 PYURST? VURST 

23 40652 040467 PESCT: ESCST 

24 

25 40653 140445 LIFO: NEGO 2/0,SNR ;SKIP IF THIS IS NOT THE LAST 

26 7CHARACTER IN THE LINE, OTHERWISE 
27 7SET THE CARRY TO 0 

28 40654 ve0110 ~ LDA 0,BACK ;ACU = COMPLEMENT OF THE NUMBER UF 
29 sCHARACTERS IN THE LINE 

30 4065S 030050 LDA 2,PFIFR ;AC2 = POINTER TO FIFOB 

31 40656 025002 LDA 1,L0,2 

32 106403 SUB O,1+SNC ;SKIP IF NOT END OF THE LINE 

33 40660 045002 STA 1,L0-2 

34 004564 JSR GET2 7GET THE NEXT CHARACTER TO BE PRINT 
35 7ED WHILE GOING BACKWARD 

36 GOTIT: IN 2,4 = 
37 40662 032014 LDA 2,0.PIN+4 

38 40663 153113 ADDL# 222,/SNC sTEST FOR ON LINE 

39 40664 000407 JMP GTITi=-1 300 NOT CHECK ESC OFFLINE 

40 40665 030152 LDA 2,ESFL1 sESFLI WILL BE 0 IF THERE IS NO 

at sESCAPE COMMAND SEING DECODED 

42 40666 151004 MOV 2,2,SZR :SKIP IF NO ESCAPE COMMAND IS BEING 
43 < 7DECODED 

44 40667 002533 JMP @PESDCD ;DECODE THE ESCAPE COMMAND 

45 20670 030051 LDA 2,033 sAC2 = 33 

46 40671 112415 SUB# 0,2,SNR ;SKIP IF IT WAS NOT STARTING OF AN 
47 sESCAPE COMMAND 

48 40672 002760 JMP OPESCT SET ESFLIi 

49 40673 040063 STA O,CHRDY sCHROY IS THE NEXT CHAR, TO BE - ae 
50 >PRINTED 

51 40674 030120 GTITis LOA 2,PFMD 3GET STATUS OF OUT OF FORMS 

52 40675 151004 MOV 2,2,SZ2R ;SKIP IF FORMS OK 

53 40676 002525 JMP DEMPT1 yFORM ERROR RETURN TO SCAN 

54 40677 020145 LOA Q,VUFLG :GET VIEW FLAG 

5S 40700 100404 NEG 0,0-SZR ;SKIP IF CARRIAGE WAS NOT MOVED FOR 
S6 7THE VIEW 

S7 40701 002750 IMP @PVURST sQTHERWISE RESET THE CARRIAGE 

58 40702 024127 LDA 1,HRTER #GET THE HEAD ERROR FLAG 

$9 40703 125004 MOV ~ 1,1,SZR :SKIP IF THE HEAD WAS NOT MOVED 

60 40704 000520 JMP TOINT sRESET THE HEAD 


0025 L 
40705 
40706 
40707 
40710 
40711 
40712 
40713 
40714 
40715 
40716 


40717 
40720 


40721 
40722 
40723 


40724 
40725 
40726 
40727 
40730 
4073) 
40732 
40733 
90734 
40735 
40736 
40737 
40740 
4074) 
40742 


GOT4S 


40744 
40745 
40746 
40747 


40750 
“40751 


40752 


40753 
40754 
40755 
40756 


40757 
40760 


40761 
60 °40762 


PROPRIETARY INFORMATION 


COPYRIGHT DGC, 
Pao. 
o30114 
151234 
000407 
020063 
034032 
1164406 
024113 
174406 
000554 
151005 GTlTe: 


030073 
151004 


002060 
050200 
050150 


020130 
024063 
034036 
136654 
034037 
136645 
002557 
030144 
151004 
000473 
151405 TPMFA$ 
002060 
152000 
050063 
174065 


002456 


044112 
024113 
OS410t 
130142 


030007 
156407 


002540 


030146 
050147 
030137 
050136 


030161 
034117 


175100 
151100 


1979 


LDA 
MOVZRA 
JMP 
LDA 
LOA 
SuBO 
LOA 
NEG 
JMP 
Mov 


LDA 
MOV 


JMP 
STA 
STA 


LOA 
LDA 
LDA 
SUBURS 
LDA 
SUBOR 
JMP 
LDA 
MOV 
JMP 
INC 
SMP 
AOC 
STA 
COMC 


JMP 


STA 
LOA 
LOA 
COMOL 


LOA 
SUB 


JMP 


LDA 
STA 
LDA 
STA 


LOA 
LDA 


MOVL 
MOVL 


OF DATA 


2;PRCNT 
272,S2R 
GTIiTe 
0,CHRDY 
3,C177 
0,3 
1,PROIR 
3,3,SEZ 
TapcD 
272,SNR 


2,VSLEW 
2,2,S2R 


@PSCAN 
2,TBFL 
2,Swtin 


O,HSTFL 
1,CHROY 
3,013 
1,3,S2R 
3,C15 
1,3,SNR 
@PNXTLN 
2ePLTSL 
2,2,SZR 
TPMF 
2/2-SWR 
OPSCAN 
22 
2,CHRDY 


“3,3,SNR 


OPALTNT 


1,PRCHR 
1,PROIR 
3,HPOS 

1,2,SZC 


2,0132 
2,3,S8N 


aPSTP1 


2-SCRFL 
2,SCOR 

2,O0LFLG 
2,0LA0R 


2,/ELNEN 
3,PRTYP 


3,3 
2,2 


GENERAL CORPORATION, 


7GET THE PRINT STEPS 
3TEST FOR COUNT OF ONE 
3NO NOT ONE 


sMAKE ACS EQUAL TO 177 

#SET UP DATA FOR TAB 

3GET THE PRINT OIRECTION 

SKIP IF TAB IS NOT TO TAKE PLACE 
7GO TO SET SLEW MODE FOR TAB 

SKIP IF CHARACTER IS NOT COMPLETELY 
sPRINTED 


sSKIP IF A VERTICAL STEP “IS NOT BEING 
TAKEN 


SET STATUS OF TAB TO ZERO 
sRESET THE FLAG TO TIME THE LINEFEED 
sAND FORMFEED SWITCHES 


7ACO = HOREZ. COMMAND 

3AC3 = 13 

SKIP IF A LF OR VERTICAL TAB 
7AC3 = 15 


SKIP IF NOT A CR OR FF 

eSTART THE NEXT LINE 

1GET PLOT MODE FLAG 

3SKIP IF NOT IN PLOT MODE 

?SET SPECIAL STATUS FOR PLOT MODE 
sTEST TO SEE IF LINE IS TERMINATED 
sNOT YET RETURN TO SCAN 

2MAKE AC2 = #1 

sRESET THE CHARACTER READY FLAG 
3SKIP IF NOT A COMMAND RELATED TO 
ZALTERNATE CHARACTER 16 OR 17 
sEXECUTE THE ALTERNATE CHARACTER 
COMMAND GO WITH CARRY=0 TO SELECT 
rAND 1 TO DESELECT 


3GET PRINT DIRECTION 

3GET THE HORIZONTAL POSITION 

SKIP IF MOVING TO THE LEFT WITH 
?CARRY = 0 AND AC2 = 1 

sAC2 = 132. 

sSKIP IF "HPOS" IS LESS THAN 132 
3AND THE PRINT DIRECTION IS TO 

+THE RIGHT OR IT 1S MORE THAN 1 
AND THE PRINT DIRECTION IS TO LEFT 
tIF 132 CHARACTERS HAVE BEEN PRINTED 
sTHEN GO TO STOP THE MOTOR 

sPREPARE TO SET UNDER SCORE FLAG 


sSELECT/DESELECT DOWN LINE LOADED 
sCHARACTER SET 

READ THE FLAG FOR ELONGATED PRINT. BIT 
30 WILL BE SET IF THE NEXT CHARACTER IS 
7TO BE PRINTED UNDER ELONGATED MODE 


tMASKOUT BIT 0 
BIT 0 WILL REPRESENT ELONGATED PRINT 


o1 


40763 
40764 


40765 


40766 
40767 
40770 
40771 


40772 
40773 


40774 
40775 
40776 
40777 
41000 
41001 
41002 


41003 
41004 


41005 


41006 
41007 
41010 
41011 
41012 


41013 
41014 
43015 
41016 
41017 
41020 
41021 
41022 
41023 
41024 
41025 
41026 
41027 
81030 
41031 
91032 
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175200 
054117 


151100 


030033 
125113 
152560 
050115 


030034 
143444 


141220 
175102 
030037 
050114 
010177 
000512 
030107 


034110 
157000 


101004 


117053 
102021 
101420 
040116 
112016 


002060 
034033 
172052 
006057 
006056 
002060 
041724 
061556 
040417 
125400 
152400 
006004 
002060 
050143 
030062 
000704 


RTOFL: 


SCAN2: 


PRBGS 


PALTANT 
PESOCD 
EMPTis 
TOINTS 


TPMFs 


ae ee 


1979 


MOVR 
STA 


MOVL 


LOA 
MOVL# 
SUBECL 
STA 


LOA 
ANDO 


MOV2R 
MOVL 
LDA 
STA 
18zZ 
JMP 
LDA 


LDA 
ADU 


MOV 


ADDOs# 
ADCZ 
INCZ 
STA 
AOCK 


JMP 
LDA 
ADCO# 
JSR 
JSR 
JMP 
ALTNT 
ESCEX 
EMPTY 
INC 
SUB 
JSR 
JMP 
STA 
LDA 
JMP 


3,3 
3,PRTYP 


2,2 


2.C7 
£41,SNC 
2,2 
2,PRADR 


“2,010 


2,0,SZR 


2,0 
3,3,S82C 
2,C15 
2,PRCNT 
LTOFL 
OFLN2 
2,CHCNT 


3,BACK 
2,3 


0,0,S2R 


0,3,SNC 
0,0,SKP 
0,0 

0, PRSKP 
0,2sSEZ 


@PSCAN 
3,C7 
3,2,SZC 
@PDECS 
OPSTEP 
dPSCAN 


Yet 

2r2 
@RINIT 
@PSCAN 
2,PSPFL 
2,LINES 
TPHMFA 


GENERAL CURPORATION, 


+SAVE THE PRINT TYPE? 0 FOR REG. PRINT 
BIT 15 WELL BE 1 FOR COMP, PRINT, AND 
BIT O WILL BE SET FOR ELONGATED PRINT 
sLQAD CARRY WITH THE STATE OF ELONGATED 
sPRINT MODE 


*SKIP IF MOVING TO LEFT 


sINIT. THE ADDRESS OF THE PRINT 
7COLUMN 
2AC2=10 
3ACO = 
7 SPEED 
sACO = 4 

7SKIP IF NOT ELONGATED 


NON 0 ONLY IF STEPPING AT HIGH 


3SET PRINT COUNT 
7SKIP IF ON LINE 


-yAC2 = NUMBER OF CHARACTERS LEFT IN 


sTHE LINE TO BE PRINTED 


3AC3 = NUMBER OF CHARACTERS PRINTED 
7SO FAR 

SKIP IF THE PRINT HEAD IS NOT MOVING 
sAT HIGH SPEED 

SKIP IF FIRST 4 CHARACTERS PRINTED 
sACO = #1 

7ACO = 5 

3SET THE FLAG TO SKIP 

sSKIP IF THE MOTOR IS NOT STEPPING 
tOR THERE ARE LESS THAN 7 CHARACTERS 
sIN THE LINE 


3AC3 = 7 

sSKIP IF THERE ARE 6 OR LESS CHAR. 
START DECELERATED STEPS 

sSTART INC. STEPS 


sINITIALIZE THE HEAD 

sMOVED BY HAND 

3SET SPECIAL FLAG FOR PLOT MODE 
sGET LINE STATUS OF BUFFER 
*RETURN TO MAIN 
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01 Gets 7**xGET CHAR INTO ACO FROM FIFOB 

02 7GET1 TO LOAD ACO FROM FIFOA . 

03 PICTURE OF A TYPICAL FIFO (RING BUFFER) 

04 sMASKs N 1 sNUMBER OF BYTES IN FIFO 
os < tL: 0 ;OFFSET FROM 8ASE IN BYTES 
06 7TO LAST CHAR PUT IN. 

07 LQ: N sOFFSET FROM LI IN 8YTES 
08 7TO LAST CHAR GOTTEN UUT. 
09 : BASEx2 38YTE POINTER TO BUFFER 
10 Fone 

it 7BASEs «BLK ?STARTING ADORESS OF BUFFER 
la TITSELF AND ITS LENGTH. 
13 : FLOSES ACI, AC2, CARRY : 

14 41033 030050 LDA 2,PFIFS 

15 41034 175401 INC 3,3,SKP sADD ONE TU RETURN ADDRESS 

16 41035 030566 GET1: LDA 2,PFIFA 

17 41036 021000 LDA O,MASKs2 

18 41037 025002 LDA 1,L0,2 : 

19 41040 106015 ADCH# 0,1,SNR ;SKIP IF BUFFER HAS CHARACTERS 
20 41041 001400 JMP 0-3 3NO CHAR, IN THE BUFFER 

21 41042 125400 INC 1,1 7SUB ONE CHARACTER FROM BUFFER 
22 41043 045002 STA 1,10,2 

23 41044 175400 INC 3,3 7ADD ONE TO RETURN ADDRESS 

24 41045 021001 GETa: LDA O,LI,2 

25 41046 107000 vel Or1 

26 41047 021000 LDA O,MASKr2 

27 41050 106053 ADCO# Ort, SNC 

28 41051 106000 ADC Ort 3AC1 = BYTE NUMBER TO BE READ 

29 41052 031003 - LDA 2,BBUF re pemee 

30 41053 133000 ADO 1,2 sAC2 = BYTE ADDRESS 

31 ’ LOBES x*xSUBROUTINE TO LOAD BYTES INTO ACO FROM 

32 BYTE ADDRESS IN AC2, 

33 7LOSES AC2,CARRY 

34 sREENTRANT 

35 41054 151200 MOVR 22 

36 41055 021000 LDA: 0,0,2 7GET WORD FROM BUFFER 

37 41056 101013 MOV 0,0,SNC +TEST WHICH BYTE 

38 41057 101300 MOVS 0,0 7SWAP BYTES 

39 41060 030031 MSKOT: LOA 2,C377 

40 41061 143400 AND 2,0 sSAVE ONLY RIGHT BYTE 

41 43062 024201 Loa 1,8YFLG s;GET BUFFER STATUS 

42 41063 125113 MOVL# 1,1,SNC. ;TEST IF BUFFER IS FULL 

43 41064 001400 JMP 0,3 7RETURN WITH CHARACTER 

44 41065 014176 0SZ BUF ST 7COUNT CHARACTERS TAKEN OUT OF BUFFER 
45 41066 001400 JMP 0,3 sRETURN WITH CHARACTER 

46 41067 050201 STA 2,BYFLG ;YES SET UP STATUS TO SEND CLEAR 
47 81070 001400 MP +} (073 3NO RETURN WITH CHARACTER 


PROPRIETARY INFORMATION OF DATA 
COPYRIGHT DGC, 1979 
$0026 LPeoi 


OL : 

02 41071 060277 TBOCD: INTOS 

03 41072 152000 ADC 2,2 

04 41073 020200 LDA 0, TBFL 
0S 41074 101405 INC 0,0,SNR 
06 41075 157000 ADD 2,3 

07 41076 050200 STA 2,TBFL 
08 41077 050063 STA 2,CHRDY 
0S 41100 030102 LDA 2,HSLEW 
10 41101 157000 ADD 2,3 

1i% 41102 020130 LDA O,HSTFL 
12 41103 152520 SUBZL ~ 2,2: 

13 41104 175440 INCG 3,3 

14 41105 0549102 STA 3,HSLEW 
15 41106 054166 STA 3,HTBFL 
16 41107 060177 INTEN 

17 G1i10 000702 JMP SCAN2 
18 


19 41411 040136 PNXTLN? NXTLN 
20 41112 040321 PSTP1s STPI 


21 

22 Gi113 101004 OFLNe: MOV 0,0,SZR 
23 

24 441114 000674 IMP RTOFL+1 
25 41115 152400 SUB 2,2 

26 41116 020112 © LDA 0,PRCHR 
27 41117 034082 © LDA 3,C40 
28 41120 116042 ADCO 0,3,SZC 
29 

30 41121 000666 JMP RTUFL 
31 41122 050114 STA 2,PRCNT 
32 41123 024454 LDA 1,RNBLL 
33 41124 034033 LDA 3,07 

34 41125 116405 SUB 0-3,/SNR 
35 41126 044061 STA 1,BLCNT 
36 41127 002060 JMP OPSCAN 


GENERAL CORPORATION, 


sMAKE AC2 EQUAL TO =1 

7GET STATUS OF TABS 

:TEST TO SEE IF SECOND TAB 
sYES 

3SET STATUS FOR NEXT TIME 
;RESET CHARACTER READY 

7GET STEPS LEFT IN SLEW MODE 


; 

:GET HORIZONAL COMMAND 

sMAKE AC2 EQUAL TO 1 

3AC3 = # OF SLEW STEPS TU BE TAKEN 
;PREPARE TO TAKE SOME STEPS 

;MAKE FLAG NON ZERO TAB SLEW STEPS 


“SSKIP IF THE HORIZONTAL MOTOR WAS NOT 
+STEPPIING AT HIGH SPEED 


GET THE CHARACTER THAT WILL BE PRINTED 
sACZ = 40 

ySKIP IF THE CHARACTER IS A NUN 
sPRINTABLE CHARACTER 


7D0N'T PRINT IT 
:GET COUNT FOR BELL 


;SKIP IF BELL NOT TO BE RUNG 
3SET UP BELL COUNT 


10029 


01 
02 
03 
oa 
os 
06 
07 
08 
09 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24a 
2s 
26 
27 
28 
29 
30 
3 
$2 
33 
34 
35 
36 
37 
38 
39 
40 
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41130 
41131 
41132 
41133 
41134 
41135 
41436 
41137 


41140 
4y1ay 


4itda 
Gi14az 
aiyau 
4114S 
41146 


41447 
41150 
41151 
4115a 
91153 
41154 


41155 
41156 


41157 
41160 
41161 
41162 
41163 
41164 
4116S 
41166 
41167 
44170 
44171 
41172 
41173 


LPe01 


054066 
102400 
030050 
073103 
112000 
050105 
031401 
035400 


137000 
132400 


050103 
110000 
v2a5400 
125220 
151404 


000776 
020105 
125225 
000404 
102400 
0004s) 


151400 
014103 


175401 
000412 
025400 
125005 
000772 
900402 
101400 
1es2e5 
000776 
024050 
073301 
034066 
001402 


TBCALS: 


TBCLOSs 
TBELIs 


TBCLe: 


TBCL3: 


1979 


s**COME HERE TO 


CALCULATE THE NUMBER OF POSITIONS 


+NEEOED TO COMPLETE THE TAB 


sENTER WITH ACI 


= CURRENT HORIZONTAL/VERTICAL POSITION 


sAC3 POINTING TO THE STARTING OF THE TAB BUFFER IN 


sPAGE 0 AND THE 
7THAN THE WORDS 
7THE SUBROUTINE 


sOF AC3 +2 

STA 3,RETA 
SUB 0,0 

LOA 2,C20 
OlV 

ADC 0.2 

STA 2,TEMPY 
LDA 2,1,3 
LOA 3,03 
Ao0 1,3 

SuB 1,2 

STA 2, TEMP1 
com 0,2 

LOA 1.0/3 
MOVZR 1,1 i 
INC 2/2,S2R 
JMP ere 

LDA 0, TEMPY 
MOVZR 1,1,SNR 
dMP TBCLI 
SuB 0,0 

JMP TBCLe 
Inc. 22 

082 TEMP1 
Inc 3,3,SKP 
JMP TACL3 
LDA 1,0,3 
MOV 1,1,SNR 
uMP TBCLO 
JMP «+2 

INC 0,0 
MOVZR 1,1,SNC 
SMP 72 

LOA 1,C20 
MUL 

LDA 3,RETA 
JMP 2,3 


NEXT LOCATION HAVING A NUMBER 1 MURE 
USED BY THE BUFFER 
WILL RETURN THE CONTROL TO THE CONTENTS 


+SAVE THE RETURN ADDRESS 


ACO = REMAINDER AND AC1- QUOTIENT 


sSAVE THE DIFFERENCE OF REMAINDER FROM 20 


sAC3 = POINTING TO THE STARTING OF THE 
7TAB BUFFER 

7AC3 = ADORESS OF THE LOCATION WHICH 
HAS THE CURRENT POSITION IN IT 

sAC2 = NUMBER OF LOCATIONS LEFT IN 
?THE TAB BUFFER +1 


SKIP AFTER MAKING BIT 15 OF ACI 
TEQUAL THE NEXT HORIZ./VERT. POSITION 


SKIP IF ANY TAB BIT IS SET IN 
7THIS WORLD 


sIF THIS SIT WAS SET THEN GET THE 
sDISTANCE FROM THE PRESENT POSIITION 


3SKIP IF ALL QF THE LOCATION IN THE TAB 
?BUFFER HAVE BEEN CHECKED 


READ THE NEXT LOCATION OF TAB BUFFER 
SKIP IF SOME BIT IN AC1 IS SET 


sSKIP IF THIS BIT WAS SET 
sAC1 = 20 


sRETURN AFTER LOADING AC1 WITH THE NO, 
OF POSITIONS TO BE MOVED FOR THE TAB 


o1 
v2 
03 
04 
05 
06 
07 
08 
09 
10 
li 
12 
13 
14 
1s 
16 
17 
18 
19 
20 
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41174 
41i75 
41176 
G1177 
41200 
41201 


41202 
41203 


41204 
41205 
44206 


41207 
41210 
4t2h1 
41212 
41213 
aieia 


41215 
41216 
41217 
41220 
41221 
41222 
4k223 
4teeq 
Steed 
41226 
41227 
41230 


131102 KEYT1: 
000513 
034124 
O10Le6 
020032 
106037 


TBRPT3 
RNBLLE 


000533 
020064 


117000 
054124 
106400 


044103 
020052 
006403 
024103 
000763 
041424 PPUTIS 


KYBRD: 


022015 
034032 
163400 
034066 
054067 
006405 
000025 PFIFA: 
034067 
054066 
002054 
04t422 PPPUTS 
041555 PESC: 


1979 


MOVE 
JMP 
LOA 
18Z 
LDA 
ADC248 


JMP 
LDA 


ADD 
STA 
SUB 


STA 
LOA 
JSR 
LOA 
JMP 
PuTl 


1,2,S2C 
TOKEY 
3,PSFLG 
LNSIZ 
0,C177 
0,1,SBN 


KEYTS 


0,ECLCT 


0,3 
3,PSFLG 
0,1 


1, TEMP) 
0,C40 
OPPUTI 
1, TEMP? 
TBRPT 


GENERAL CORPORATION, 


3SKIP IF A TAB COMMAND 


#GET THE CHARACTER POSITION FLAG 
sINC. THE LINE SIZE 

7AC0 = 177 

SKIP IF THE TAB REQUIRES A MOVEMENT 
30F MORE THAN 200 OCTAL CHARACTER 
sPOSITIONS 


ACO = 1 FOR REGULAR & 2 FOR ELONGATED 
sCHARACTERS BEING SAVED 

ACS = NEW HORIZONTAL POSITION 

sAC1 = NUMBER OF CHARACTER PUSITION LEFT 
#TO COMPLETE A HORIZONTAL TAB 


sSAVE A SPACE 


#**SUBROUTINE TO ACCEPT A KEY FROM THE KEYBOARD 
AND STORE IN THE FIFOA 


IN 
LDA 
LOA 
AND 
LDA 
STA 
JSR 
FIFOA 
LDA 
STA 
JMP 
PUT 
ESCSV 


0,5 READ THE KEY 
0,d.PINt5 
3,C177 
3,0 ¢STRIPT THE PARITY BIT 
3,RETA 
3,RETS SAVE "RETA" 
@OPPPUT 

;PUT IT IN FIFOA 
S,RETS 
3,RETA ;RESTOR "RETA" 
@PRSTR RETURN 
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01 ROTTOs 3A CHARACTER HAS COME IN THE TTO LINE. 
02 41231 062401 SAV 
03 IN O,2- 3LOAD CHARACTER IN ACO 
04 41232 022012 LDA 0,0,.PIN+2 
05 41233 105000 STDE: Mav Ol 3SAVE THE CHARACTER TO SE PRINTED 
O06 41234 152400 SUB 2r2 7CLEAR AC2 
07 41235 050157 STA 2,DSRFL sRESTART TIMER FOR DISCONNECT 
08 41236 030031 LOA 2,0377 : 
09 41237 155400 INC 2,3 7AC3 = 400 
“10 41240 117405 AND 0,3,SNR s:SKIP IF NO PARITY ERROR 
11 41241 020031 LDA 0,C377 ERROR CHARACTER RUBOUT 
12 41242 143400 AND 2,0 3MASK OUT THE LEFT BYTE 
13 41243 034132 LDA 3,DLLF <:GET THE DOWN LINE LOAD FLAG 
14 41244 175014 MOVHA 3,3,SZR ;SKIP IF IT IS NOT DOWN LINE 
15 7LOAD 
16 41245 005400 JSR 0,3 7GO0 TO DOWN LINE LOAD ROUTINE 
17 41296 195220 . MOVZR 2,3 3AC3B = 177 : 
18 44247 030151 LDA 2,ESFLG ;READ THE FLAG INDICATING THE 
19 SAVING OF AN ESCAPE COMMAND 
20 41250 151234 MOVZR# 2,2,SZR ;SKIP IF NOT AN ESCAPE COMMAND 
21 44251 002757 JMP @PESC 
22 81252 163400 AND 3,0 ONLY INTERESTED IN BITS 9-15 
23 491253 137400: AND 1,3 MASK OUT BITS 0-8 OF THE CHARACTER 
24 ; ORIGINALLY RECEIVED 
25 41254 030051 LDA 2,033 
26 414255 112415 SUB# 0+2,SNR 3;SKIP IF NOT STARTING OF AN ESCAPE 
27 COMMAND 
28 414256 000540 JMP 1833 
29 41257 030142 LDA 2,PLTFL 3AC2 = 0 IF PLOTTING MODE NOT TO 
30 * 7B8& SELECTED FOR THIS LINE 
31 41260 £51004 MOV 2,2,SZR SKIP IF NOT UNDER PLOTTING MODE 
32 41261 000457 JMP KEYT4 7SAVE EVERY CHAR FOR PLOT MODE 
33 41262 024025 LDA 1,017 sACi=17 
34 41263 106645 SUBOR 0,1,SNR ¢SKIP IF NOT AN ALT. CHAR, COMMAND 
35 41264 000527 JMP ESc3 7SAVE IT 
36 41265 024034 LOA 1,010 sACLi = 10 
37 41266 030036 LOA 2,C13 7AC2 = 13 
36 41267 112654 SUBOR# 0,2,SZR ;SKIP FOR A NEW LINE OR VERTICAL TAB 
39 41270 030037 LDA 2,cis : 
40 41271. 106405 SUB- 0,1,SNR SKIP IF A BACK SPACE 
41 44272 143000 MOV 2,0 3A BACK SPACE WILL BE REPLACED BY 
42 7A RETURN 
43 41273 112655 SUBOR# 0,2,SNR sSKIP IF NOT A "NEW LINE", "RETURN" 
4a 30R FORM FEED 
45 41274 000446 JMP LNEND ‘ 
46 41275 124014 coma 4,1,SZR ;SKIP IF IT WAS A HORIZ TAB 
47 41276 000410 JMP KEYTO 
48 41277 024124 LDA 1,PSFLG 3;AC1 = POSITION FLAG 
49 41300 004630 JSR TBCAL sCALCULATE THE NUMBER OF HORIZ POS. 
50 7TO BE MOVED FOR THE TAB 
51 41301 000211 HTAB 
52 41302 000012 12 
53 41303 125005 MOV 1,1,/SNR :SKIP IF SOME MOVEMENT IS DESIRED 
S54 44304 002054 JMP @PRSTR 3:RETURN WITHOUT SAVING 
55 41305 020052 LoA 0,040 
S6@ 41306 030135 KEYTO: LOA 2,DLLSL ;SEE IF DOWN LINE LOADED CHARACTER I3 
57 ‘ 7BEING SAVED 
56 41307 151004 MoV 2,2,SZR 3SKIP IF NOT SAVING DOWN LINE LOADED 
59 #CHARACTERS 
60 41310 000477 TOKEYs JMP KEYT3 


01 
02 
03 
04 
os 
06 
07 
08 
09 
10 
11 
te 
13 
14 
1s 
16 
17 
18 
19 
20 
21 
22 
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41311 
41312 
41313 
41314 
41315 


Gi3t6b 
41317 
41320 
41321 
41322 
41323 


4i3e4 


41325 
41326 
41327 


41330 
41331 
44332 


41333 
41334 


41335 
41336 
41337 
Gt34o 
aysay 


41342 
91343 
41344 


41345 
81346 
41347 


41350 


41351 
41352 


41353 
41354 
41355 


41356 
44357 


41360 
41361 


41362 


030032 
112415 
002054 
030052 
4112053 


000463 
112414 
000466 
034062 
030123 
175414 


112415 


000647 
125312 
024064 


020124 
123000 
osoiad 


004504 
000465 


123000 
137000 
054124 
004464 
000460 


044103 


KEYTBs 
KEYTUE 


LNENDs 


004461 - 


010062 


000402 
000407 
030156 


020126 


004466 
030155 


020124 
004463 
020124 


024103 
034064 


125005 
101005 


102401 


STFLis 


1979 


LDA 
SUBE 
JMP 
LDA 
ADcOR 


JMP 
SUBR 
JMP 
LDA 
LDA 
Ince 


SUBS 


JMP 
MOVL# 
LOA 


LDA 
ADO 
STA 


JSR 
JMP 


AOD 
ADD 
STA 
JSR 
JMP 


STA 
JSR 
1SzZ 


JMP 
JMP 
LDA 


LDA 


JSR 
LDA 


LDA 
JSR 
LDA 


LDA 
LDA 


MOV 
MOV 


SUB 


2eCi77 
0,2,SNR 
aPRSTR 
2,040 
0-2/SNC 


TBELL 
0,2,SZR 
KEYT2 
3,LINES 
2,LOSPC 
3,3,52R 


0,2¢SNR 


KEYT1 
1/1¢S32C 
1,ECLCT 


0,PSFLG 
1,0 
0,PSFLG 


STOB 
CLRBSY 


1,0 

1,3 
3,PSFLG 
PUTL 
CLRBSY 


1, TEMP1 
PUT1 
LINES 


st2 
STFL1 
2,CHADR 


O,LNSIZ 


STOB 
2+PSADR 


0,PSFLG 
STOB 
0,PSFLG 


1, TEMP1 
3,E€CLCT 


1,1,SNR 
0,0-SNR 


0,0,SKP 





GENERAL CORPORATION, 


vAC2 = 177 

sSKIP IF THE CHARACTER RECEIVED WAS A 
?RUBOUT RETURN WITHOUT SAVING 

sAC2 = 40 

7SKIP IF THE CHARACTER IS NOT A CONTROL 
sCHARACTER 


7SKIP IF A SPACE 


7GET THE FLAG FOR LEADING SPACES 
7SKIP IF THIS IS THE FIRST LINE BEING 
SAVED 

7SKIP IF LEADING SPACES ARE 

?BEING COLLECTED 


7SKIP IF A LEADING TAB CUMMAND 
s"ECLCT" IS 1 FOR REGULAR & 2 FOR 
sELONGATED CHARACTERS SAVED IN THE 
PRINT BUFFER 


;SAVE THE NEW HORIZONTAL POSITION OF 
sTHE LINE BEING SAVED 
SAVE THE NUMMBER OF LEADING SPACES 


3SAVE THE NEW POSITION FLAG 
37PLACE THE CHARACTER IN FIFO8 


SAVE THE LINE TERMINATOR 
sSTORE THE LINE TERMINATOR 
INCREMENT THE COUNTER FOR THE 
NUMBER OF LINES IN THE BUFFER 
:SKIP IF THIS WAS END OF THE 
VERY FIRST LINE 


AC2 = BYTE ADDRESS WHERE THE SIZE 
30F THE LINE WILL BE STORED 

7ACQ = NUMBER OF CHAR. IN 

7THE LINE 


7GET THE BYTE ADORESS WHERE THE LINE 
3SIZE INFORMATION IS TO BE SAVED 

7GET THE LINE SIZE 

SAVE IT 

ACO = POSITION OF THE LAST CHARACTER IN 
THE LINE 

#GET THE LINE TERMINATOR 

yAC3 = 1 FOR REGULAR & 2 FOR ELONGATED 
sCHARACTERS BEING SAVED 

SKIP IF IT WAS NOT BACK SPACE 

:SKIP IF THERE ARE SOME SPACES OR 
;CHARACTERS IN THE LINE 


01 
02 
03 


41363 


41364 
41365 


41366 


41367 
41370 
41371 
41372 
4t373 


4374 
41375 


44376 


41377 


41400 


41401 
41402 
G1QQs 
41404 
4440s 
491406 
41407 
41410 


41411 
41412 


Stars 
41414 
41415 


4416 
41417 
41420 
414dei 
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162400 


o4gted 
004437 


050123 


102400 
040153 
080126 
004432 
050154 


004430 
050155 


004426 


050156 


0004e1 


030407 
034033 
116405 
050061 
002054 
050123 
034124 
010126 


024064 
000724 


125520 
040140 
000463 


026013 
127102 
040151 
002054 


TBELLs 


KEYT2: 
KEYT3$ 
RNBL1S 


ESC3: 


1833: 


1979 
sus 


STA 
JSR 


STA 


Sub 
STA 
STA 
JSR 
STA 


JSR 
STA 


JSR 
STA 


JMP 


LOA 
LDA 
Sub 
STA 
JMP 
STA 
LOA 
sz 


LDA 
JMP 


INCZL 
STA 
JMP 
IN 
LOA 
ADOL 
STA 


CLRBSY: JMP 


3,0 


0,PSFLG 
PUTL 


2-LOSPC 


0,0 
0,ESCMD 
O,LNSIZ 
PUT! 
2,ECMNO 


Pull 
2,PSADR 


PUT1 


2,CHADR 


CLR8SY 


2,RNBLI 
3,C7 
0,3,SNR 
2,/BLCNT 
@PRSTR 
2,LOSPc 
3,PSFLG 
LNSIZ 


“4,€CLcT 


KEYTB+1 


1,1 
0,CMNDS 
ESCP3 
1,3 


GENERAL CORPORATION, 


sDECREMENT BY 1 FOR REGULAR & 2 
3FOR ELONGATED 


sSAVE THE NUMBER OF LEADING SPACES FOR 
3THE NEXT LINE . 

7"LOSPC" HAS THE BYTE ADORESS WHERE THE 
7NQ,. OF LEADING SPACES WILL BE COLLECTED 


#CLEAR THE FLAG COLLECTING ESCAPE COMNDS. 
sRESET THE LINE SIZE COUNTER 

sINIT TRE ESCAPE COMMAND FLAG 

7"ECMND" HAS THE AODRESS OF THE BYTE 
sWHERE ESCAPE COMMAND FLAG WILL BE SET 
sINIT THE LINE SIZE FLAG 

7"PSADR" HAS THE BYTE ADORESS WHERE THE 
?7SIZE OF THE LINE WILL 8E SAVED 

sINIT THE COUNTER FOR THE NUMBER OF 
#PRINTABLE CHARACTERS IN THE LINE 
s"CHADR" HAS THE BYTE ADDRESS WHERE THE 
?NUMBER OF CHARACTERS IN THE LINE WILL 
7BE SAVED 


3GET BELL COUNT 

7GET BELL CODE IN ac3 

7TEST FOR BELL & SKIP IF IT IS BELL 
sRING THE BELL 

sRETURN WITHOUT SAVING 

s00N’T COLLLECT LEADING SPACES ANY MORE 
#GE1 THE CHARACTER POSITION IN THE LINE 
sANY CHARACTER THAT GOT SAVED IN THE 
FOUFFER WILL INCREASE THE LINE SIZE 
sAC% = 1 FOR REGULAR AND 2 IF ELONGATED 
CHARACTER 1S BEING SAVED 


sAC1iS2 
SAVE THE COMMAND RECEIVED 


1,9,PIN+3 


1,1,82C 
0,ESFLG 
@PRSTR 


+SKIP IF ESC SWITCH IS SET 


30034 


01 
02 
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41422 
41423 
41424 


414625 
414426 
41427 
41430 
4ia34 
41432 


41433 
41434 
41435 
41436 


41437 
41440 
41443 
Gigdea 


41443 


aidag 
4144s 
41446 
41447 
41450 
4145) 
41452 


414535 
41454 


PUT: 


031400 
175401 
030050 PUuT1: 


054066 
015002 
000401 
025001 
035000 
136404 


135400 
055001 
051003 
173001 

STOBs 


054066 
034031 
151202 
163401 


163701 


174000 
025000 
167400 
107000 
045000 
151100 
002066 


QOO13% Ci3is 
000105 C105: 


1979 


#xxSUBROUTINE TO PUT CHARACTER FROM ACO INTO FIFO 
7JSR 1S FOLLOWED SY POINTER TU FIFO CONTROL BLOCK 
7SEE GET FOR FIFO PICTURE 
#LOSES ACO, ACi,AC2,CARRY 


LDA 
INC 
LOA 


STA 
DS2 
JMP 
LDA 
LOA 
SUB 


INC 
STA 
LDA 
ADD 


2,0,3 sAC2 = ADD, OF THE FIFO 
3,3,SKP 
2,PFIFAR s;ENTER HERE ONLY IF THE BYTE 
sHAS TO BE PLACED IN FIFOB 

3,RETA ;SAVE THE RETURN ADDRESS 
L0,2 
etl 

“1,LIre 
3,MASK,2 


1,3-SZR ;SKIP IF AC1 HAD BECOME EQUAL TO 
;THE MAXIMUM SIZE OF THE SUFFER 

1,3 

3,Li,2 

2,BBUF ,2 


3,2,/SKP :AC2 = BYTE ADDRESS 


*kSUBROUTINE STORE BYTE 

3ACO HAS CHAR ON RIGHT PLUS GARBAGE 
7AC2 HAS BYTE ADDRESS 

sLOSES ACL 


sREENTRANT 

STA 3,RETA 

LDA 3,C377 

MOVR 2,2,S82C 

AND 3,0,SKP sRIGHT HALF OF THE WORO IS 
sADDRESSED BY ODD BYTE ADDRESS 

ANOS 3,0,SKP sAND THE LEFT HALF BY THE 
sEVEN BYTE ADDRESS 

COM 3,3 

LOA 1,072 

AND 3,1 

ADD Q,1 

STA 1,0;e 

MOVL 22 

JMP ORETA 

131 

105 


o1 
02 
03 
04 


. OS 


06 
07 
08 
09 
10 
M1 
le 
13 
14 
1s 


60° 


PRUPRIETARY INFORMATION OF DATA 
COPYRIGHT OGC, 
10035 LPedol 
054066 ESCHK: 


41455 
41456 


41457 
$1460 
414aol 
41462 


41463 


91464 
91465 
41466 
41467 
41470 


aia7. 
41472 
41473 
41a7a 
Qia75 
41476 
4ia77 
41500 
41501 


41502 
41503 
41504 
41505 


41506 


41507 
41510 
41511 


41512 
41513 
41514 
41515 
81516 


41517 
41520 


415e1 
41522 


41523 
41524 


41525 
41526 


41527 
41530 


o341a4 


175004 
002474 
034052 
os4t23 


002066 


102400 
010105 
000566 
040151 
002464 


04015! 


004763 
O4015t 
044105 
v20051 
004726 
024105 
020153 
107415 


123000 
040153 
034062 
030154 


175404 


004730 
020140 
000627 


125404 
000416 
145440 
125416 
105005 


O44i5t 


030140 


034732 
1720184 


034731 
172005 


004730 
151414 


000611 
000567 


NOMORS 


ESCPIs 


EScPes 


ESCP3s 


ARGMNTS 


1979 


STA 
LDA 


MOV 
JMP 
LDA 
STA 


JMP 


SUB 
18Z 
JMP 
STA 
JMP 


STA 
JSR 
STA 
STA 
LDA 
JSR 
LDA 
LDA 
AND# 


AoD 
STA 
LDA 
LDA 


INC 


JSR 
LOA’ 
JMP 


INC 
aMP 
Inco 
INCH 
MOV 


STA 
LDA 


LDA 
ADC# 


LDA 


ADC - 


JSR 
INCH 


JMP 
JMP 


3,RETA 
3,PSFLG 


3,3,8ZR 
aPCLRB 
3,040 
3,LDSPC 


QRETA 


0,0 
SVEX 
TRIOC 
0,ESFLG 
@PCLRB 


0,ESFLG 
ESCHK 
0,ESFLG 
1,SVEX 
0,C33 
PUT’ 
1,SVEX 
0,ESCMD 
Or i,SNR 


1,0 

0, ESCMD 
3,LINES 
2, ECMNOD 


”3,3,S2R 


STOB 
0,CMNDS 
KEYTS 


1,1,5Z2R 
ARGEX 
eri 
1,1,SEZ 
Ole SNR 


1,ESFLG 
2,CMNDS 


3,0131 
3,2,SZ2R 


3,0105 
3,2,SNR 


ESCHK 
22,/3ZR 


KEYTA 
HRTAB+3 


GENERAL CORPORATION, 


3SAVE THE RETURN ADDRESS 

3AC3 = CURRENT POSITION OF THIS LINE 
?IF IT WAS BEING PRINTED 

3SKIP IF STARTING OF THE LINE 


sAC3 = 40 

}PREPARE NOT TO SAVE LEADING SPACES FOR 
sTHIS LINE 

;RETURN 


SKIP IF SAVING THE COMMAND 
7RETURN TO SCAN 


;RETURN TO CLRBSY 


3FOR THESE COMMANDOS TO BE ACCEPTED 
THE PRINTER SHOULD BE AT THE STARTING 
70F A LINE 

ACO = 33 

SAVE THE ESCAPE CODE 


SKIP IF THIS BIT OF THE ESCAPE 
:COMMAND FLAG WAS ALREADY SET 


yAC2 = BYTE ADDRESS WHERE THE THE ESC. 
;COMMANO FLAG WILL BE SET 

;SKIP IF-THIS IS THE FIRST LINE BEING 
2: ASSEMBLED 

SAVE THE BYTE AT ADD. IN AC2 

GET THE COMMAND WORD 


3sSKIP IF ARGUMENT IS BEING SAVED 
tARGUMENT BEING EXECUTED 

IF AC2="1 THEN 0 OUT THE CARRY 

sSKIP IF AC2 WAS A ©2 OR =1 

SKIP IF THE COMMAND IS TO BE TERMINATED 
<BY A BYTE OF O AND IT IS NOT A O BYTE 


37GET THE COMMAND FOR WHICH THIS IS 
sTHE ARGUMENT 

sACZH131 

7SKIP IF IT WAS A COMMAND TO START 
EXECUTING DOWN LINE LOAD PROGRAM 
FAC3=105 

7SKIP IF NOT A VERTICAL TAB COMMAND 
3(IJE. F OR 106) 

3FOR THESE COMMANDS A LINE TERMINATOR 
+SHOULD HAVE BEEN RECEIVED 

SKIP IF COMMAND 1S TO SET HORIZONTAL 
sTAS CILE. E OR 105 


TQ SET THE HORIZONTAL TAB AC1 SHOULD 


01 
02 
03 
04 
os 
06 
07 
08 
09 
10 
1. 
12 
13 
14 
15 
16 
17 
18 
19 
20 
a1 
22 
23 
24 
25 
26 
e7 
26 


41S3t 


41532 
41533 
41534 
41535 
41536 
41537 
41540 
41544 


41542 
41543 


4isdy 
44545 
44546 
41947 
41550 
41551 
41552 
41553 


PRUPRIETARY INFORMATION UF DATA GENERAL CORPORATION, 
COPYRIGHT DGC. 
0036 LP201 


150224 


000553 
030162 
040162 
010152 
002060 
151300 
113000 
034141 


020464 
162005 


000507 
034130 
175004 
000776 
034073 
175004 
000776 
001000 


ARGEX: 


1979 


tHAVE THE HORIZONTAL POSITION AND AC2 
?SHOULD BE =1 


tx*COME HERE WHEN ESCAPE COMMANDS EXEC. ARE FOLLOWED BY 

s ARGUMENTS 

COMZR 2,2,SZR :;SKIP IF THE ARGUMENTS ARE ONLY TWO 
?BYTES LONG 


JMP ESAR1 : 

LDA 2,ARGFL :GET THE LAST ARGUMENT BYTE 

STA O,ARGFL 3SAVE THE PRESENT ARGUMENT BYTE 

1SZ ESFL1 ;SKIP AFTER RECEIVING BOTH THE BYTES 

JMP " OPSCAN 

MOVS 272 

ADD 0,2 7AC2 = ARGUMENT WORD 

LDA 3,CMNDE 3GET THE COMMAND WHICH WAS FOLLOWED BY 
sTHIS ARGUMENT 

LDA 0,C117  =sACO = 317 

ADC 3,0,SNR ;SKIP IF IT WAS NOT A COMMAND TO 
;SELECT DOWN LINE LOADED CHARACTERS 

JMP DLCHR sAC2=ADDRESS OF OLL CHAR SET 

LDA 3,HSTFL - 

MOV 3,3,SZR :;WAIT FOR THE STEPPER MOTOR TO STOP 

JMP 72 

LDA 3,VSLEW 

MoV 3,3,SZR s;WALT FOR THE VERTICAL STEPS TO COMPLETE 

JMP one 

SMP Ore 7G0 TO THE ADDRESS WHERE THE OOWN LINE 


#LOADED PROGRAM STARTS 


$0037 L 


o1 
02 
03 
04 
0s 
06 
07 
08 
09 
10 
11 
12 
13 


41554 
41955 
41556 


41557 


41560 
41561 


41562 
44563 
41564 
41565 
41566 


41567 
41570 


41571 
41572 
41573 


41574 
41575 
41576 
G1577 
41600 


41601 
41602 
41603 


41604 
41605 


41606 
91607 


41610 


41611 
41612 
41613 
41614 
41615 
41616 
41617 


PROPRIETARY INFORMATION OF DATA 


COPYRIGHT DGC, 1979 
P2ot 
041421 PCLRBs CLRESY 
326021 ESCSVs ADCZ 1,1,3KP 
126440 ESCEX: SusO l,i, 
151112 MOVL# 2r2rS2€ 
000732 JMP ARGMNT 
044105 STA 1,SVEX 
125425 INCZ 1,1,5NR 
040140 STA 0,CMNDS 
176003 ADC 343,SNC 
04014) STA 0,CMNDE 
175620 ESCLP: INCZR 3,3 
03043) LOA 2,CMADR 
173003 Add 342,SNC 
025360 LDA 1, (CMADR 
125300 MOVS 1.1 
175100 MOVE 343 
030032 LDA 2,0177 
143400 ANO 2,0 
133405 AND -152,SNR 
000665 dMP NUMOR 
142654 SUBOR# 2,0,SZR 
000765 JMP ESCLP 
024416 LOA 1,CMADR 
137000 AoD 1,3 
025766 LDA 1,01S80,3 
010105 182 SVEX 
025400 LDA 1,0181,3 
112404 SUB 0,2,S8ZR 
125300 MOVS lel 
150000 COM 22 
020031 LDA 0,C377 
123400 AND 1,0 
117000 ADD 0,3 
102400 SUB 0,0 
126520 SUBZL 1,1 
001400 JMP 0,3 


GENERAL CORPORATION, 


sENTER HERE IF SAVING COMMAND 
sENTER HERE IF EXECUTING COMMAND 
+SETS CARRY TO 0, ACi TO 0 
IF BIT 0 OF AC2 IS SET, THEN 
7THE DATA IS AN ARGUMENT 
1BIT O SET 
s"SVEX" WILL BE -1 FOR SAVE & 0 FOR 
TEXECUTE 
SKIP IF COMMAND IS BEING EXECUTED 
;COMMAND IS BEING SAVED 
sAC3=-1, SKIP IF CUMMAND BEING SAVED 
:COMMAND BEING EXECUTED - 
sAC3 WILL BE INCREMENTED EVERY 
sTIME A NEW CONSTANT IS COMPARED 
#TO THE DATA WORD IF THE CARRY = 0, 
7(AC3 IS EVEN) THEN WE ARE CHECKING 
;THE LOW BYTE OF THE CONSTANT 
7GET BASE ADDRESS 
zADD DISPLACEMENT TO BASE 
3SKIP IF CARRY IS NOT EQUAL 0 
3(AC3 ODO) AND DON?T FETCH ANOTHER 
sCONSTANT WORD, ELSE FETCH NEW 
sCONSTANT WORD 
~BASE) 41,2 7FETCH NEW CONSTANT wORD 
BY USING DISPLACEMENT FROM BASE 
SWAP OLD CONSTANT WORD TO 
sTEST NEW BYTE 
RESTORE ACS TO ORIGINAL DISPLACEMENT 
VALUE, 
7GET MASK 
sMASK OUT THE PARITY BIT 
MASK, SKIP IF VALID CONSTANT 
tEND OF LIST, INVALID COMMAND 
SKIP ONLY IF THE COMMAND 
sEQUALS THE BYTE UNDER TEST 
30R THE BYTE UNDER TEST+1, CARRY 
sWILL BE 0 FUR THE FIRST CASE, 
31 FOR THE SECOND 
sNQ MATCH, TRY NEXT CONSTANT 
GET BASE ADDRESS 
sAOD OFFSET TO IT AC3 IS 
+NUMBER OF BYTES TESTED WHEN 
sMATCH OCCURRED 

7LOAD TENTATIVE ADDRESS wORD 
3FROM SAVE TABLE 
SKIP IF SAVING, DON’T SKIP IF 
sEXECUTING 

sEXECUTING, LOAD FROM EXECUTION TABLE 
SKIP IF COMMAND WAS EXACT MATCH, 
sAC2=-t IF NOT EXACT MATCH 
sCOMMAND WAS ACTUALLY ONE HIGHER 
3SO0 SWAP BYTES FOR CORRECT ADDRESS 
sAC2 = -1 FOR EXACT MATCH AND © IF NOT 
3GET MASK 
sMASK OFF HIGH BYTE 
tAODD DISPLACEMENT TO ADDRESS 
7CLEAR ACO FOR USE IN ROUTINES 
+SET ACi TO 1 FOR USE IN ROUTINES 
JUMP TO CORRECT ROUTINE 


01 

02 
03 

o4 

os 
06 
07 
08 
09 
10 
11 

le 
13 
14 
1s 
16 
17 
18 
19 
20 
ai 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
4a. 
42 
43 
ag 
4s 
46 
a7 
48 
49 
50 
Si 
S2 
s3 
54 
$5 
S56 
57 
38 
s9 
60 


PROPRIETARY INFORMATION OF DATA 


COPYRIGHT DGC, 
0038 LP201 


41620 


4621 
4i622 
41623 
41628 
41625 
41626 


41627 
41630 
41631 
41632 
41633 
41634 
41635 
41636 
41637 
41640 


4164) 
41642 
41643 
41644 
41645 
41646 
41647 
41650 
41651 
41652 


41653 
41654 


41655 
44656 


41657 
43660 
41661 
41662 
41663 


41664 


41665 
41666 
41667 
41670 


04164% CMADR: 


030465 
036076 
042516 
os4asai 
062143 
000117 


025453 
006415 
005412 
007016 
006020 
065552 
004554 
003407 
005012 
023405 


060541 
062545 
054531 
042104 
014534 
002530 
053532 
053527 
045513 
053514 


050137 
000524 


125120 
044064 


000614 


102t21 
102620 
000607 


050142 


000776 
177766 
000000 


126620 
044151 
034433 
024035 


C117: 


SVTBL: 


BASE: 
EXTBL: 


DLCHR: 
TRIDCS 


ELNSL: 
ELNOS: 


TESPe: 
ZCMND$ 
FCMNDs 
TESP1i: 
PLMUD: 


DISO 
OIS1 


ECMD: 


CLRIB: 


GENERAL CORPORATION, 


1979 
sAC2=0 FOR EXACT MATCH 
tol IF COMMAND WAS ACTUALLY 1 
sMORE THAN CONSTANT BYTE 
BASE 
61*400+65 
74x400+76 
105*400+116 
1S1*400+141 
14424004143 
117 sLEFT BYTE OF THIS WORD SHOULD BE 0 TO 


sINDICATE THE END OF COMMANDS 


CHRTAB=.+D1S0) *400+HRTAB@.+D1S0 
(TESP2=.4+DIS0) *400+TESP2~.+DIS0 
CELNDS=.+DIS0) *400+ELNSL~.+0ISC 
(TESP1=.+01S0) *400+TESP1~.+D0IS0 
(FCMND=.+01S0) *G00+ECMD~.+DIS0 

COCMND=,+DIS0)*400+NCMND~.+DISO0 
(ZCMND=,+DISO) *400+PROLL~.+DISO 
(TESP2-.+DIS0) *400+TESP2~.+DIS0 
(PLMOD=.+01S0) *400+PLMUD=.+DISO 
(TOCLR-,+D1S0) *400+TESP2~.+DISO 


CHRZTB=.+DIS1) *400+HRZTB-.+01S1 
(VRTAB=, +0181) *400+VRTAB~.+DIS1 
(ELONG~.+01S1) *400+ELONG=.+DIS1 
(CMPRS=,+DIS1) *400+CMPRS=.+DIS} 
CVRCOMD=.+DIS1) *400+TSCAN~.+DIS1 
(DLCHR~,+DIS1) *400+PRARG=.+DIS1 
(PRARG~.+D1S1) *400+TSCAN=.+01S1 
(SCORE=,+DIS1) *400+SCORE~.+#DIS1 
(PLUT~.+DIS1)*400+PLOT~.+D1S1 

(TSCAN~. +0151) *400+MRST=.+DISt 


STA 2,DLFLG sSET/RESET FLAG TO SELECT DOWN LINE 
?LOADED CHARACTER SET 
JMP RTOCO 
MOVZL 1,1 sACL = 2 
STA L,ECLCT 3SET ECLCT TO i IF SELECTING 
sELONGATED, 2 IF DESELECTING 
JMP EScP2 7G0 TO ESCPe 
ADC2L 0,0,SKP sACOS~2 
SUBZR 0,0 7AC0=100000 
JMP ESCP! ; 
STA 2,PLTFL ;SET PLTFL TO O IF IT HAS TO BE 
:DISABLED AND ~1 IF ENABLED 
JMP TESP1 
SVTBL~BASE YDEFINE SAVE TABLE DISPLACEMENT CONSTANT 
EXTBL~BASE sDEFINE EXECUTE TABLE DISPLACEMENT 
sCONSTANT 
SUBZR 1yt 
STA 1,ESFLG ;DEPOSIT A 100000 IN "ESFLG" 
LDA 3,PHTAB 
LDA 1,Cle sACi = 12 


a1 
02 
03 
04 
05 
06 
07 
08 
09 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
at 
a2 
23 
aa 
a5 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
36 
39 
40 
41 
42 
43 
44 
4s 
46 
a7 
46 
49 
50 
51 
52 
53 
54 
55 
56 
57 
5B 
59 
60 


41671 
41672 


41673 
41674 
41675 


41676 
41677 
41700 
41701 
41702 
G1703 
41704 


41705 
81706 
41707 
41710 
Ai7ii 
41712 
41713 


Gi7i4 


41715 
41716 
i717 
41720 
41721 
41722 
41723 


4i72a 


41725 
41726 


41727 
41730 
91731 
41732 


41733 


41734 
41735 
41736 
4L737 


41740 
41741 
ai74aa 
41743 
4174q 


PROPRIETARY INFORMATION OF DATA 


COPYRIGHT DGC, 
0039 LP201 


106005 
002662 


041400 
175400 
000774 


034415 
030033 
044400 
175400 
112044 
000775 
102621 


105005 
000472 
"125400 
020125 
006412 
002060 
000202 


040151 


02gi24 
125400 
020007 
004547 
002633 
000211 
042067 


Oedtea2 


102460 
125404 


000451 
034033 
060277 
030134 


173402 


172000 
034032 


157400. 


054134 


030043 
173000 
041000 
034046 
137000 


VRCMDs 


ESARL: 


VRTBBSs 


PVTABs 


HRTAB: 


TOCLRs 
PHTABS 
TTAB: 


ALTNTS 


STOT3: 


GENERAL CORPORATION, 


1979 

ADC 0,1,SNR 

JMP @PCLRB ;RETURN AFTER CLEARING ALL OF THE 
sHORIZONTAL TAB BUFFER 

STA 0,03 

INC 3,3 

JMP ond 

LOA 3,PVTAB :AC3 = POINTER TO VERTICAL TAB BUFFER. 

LDA 2,C7 tAC2=7 

STA 0,0,3 sCLEAR 

Inc 3,3 

ADCO 0,2,SZ2R s0ECREMENT & SKIP WHEN OVER 

JMP ers = 

SUBZR 0,0,SKP ;PREPARE TO RECEIVE OTHER ARGUMENTS BY 
sDEPOSITING A 100000 IN "“ESFLi" 

MOV 0,1,SNR ;SKIP IF THE BYTE RECEIVED IS NOT 0 

JMP RTOCD 

INC ly zADD 1 TO TAB SET 

LOA Q,LNCNT ACO = NUMBER OF LINES IN THE FURMS 

JSR @1TAB 7GO TO JSR TAB STATEMENT 

JMP OPSCAN 

VTAB 

STA Q,ESFLG :0 OUT THE "ESFLG" TO INDICATE THE END 
30F ESCAPE COMMAND - SEQUENCE 

LDA 1,PSFLG ;GET THE FLAG FOR THE CURRENT POSITION 

INC 1,1 i 

LOA 0,0132 ACO = 132. 

JSR TAB 

JMP APCLRB 

HTAB 

TAG 


sENTER WITH THE CARRY A 0 TO SELECT THE ALTERNATE 
sMODE AND 1 TO DESELECT IT 


LDA 1,ALTMD 3ACL = #1 IF THE ALTERNATE MOVE JUMPER 
+IS IN 0 OTHERWISE 
SuBc 0,0 +ACO = 0 & CARRY UNCHANGED 
Inc 1,1,SZR sSKIP IF THE JUMPER IS IN AFTER 
sCOMPLEMENTING THE CARRY 
JMP RTOCOD 
LDA 3,07 sAC3 = 7 
INTDS 
LDA 2,OT3FL ;READ THE LAST OUT3 COMMAND THAT WAS 
ISSUED 
AND 3,2/SZ2C ;MASK QUT THE APPROPRIATE BIT & SKIP 
IF THE MODE HAS TO BE DESELECTED 
ADC 32 
LDA 3,Ci77) 3AC3 = 177 
AND 203 
STA 3,0T3FL 
ouT . 3,32 
LDA 2-POUT+3 
ADD 3,2 
STA 0,0,2 
LDA 3, -POUT+6 
AOD 1,3 sIF PRINT MODE WAS CHANGED FROM REGULAR 


#70 COMPRESS OR VICE VERSA THEN CLEAR 
sPRINT AND START CHARACTER INTERRUUPTS 


PROPRIETARY ENFORMATIUN OF DATA 


COPYREGHT OGC,. 


0040 LPe20t 


01 
02 
03 
o4 
os 
06 
o7 
08 
09 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
es 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
as 
46 
47 
48 


4174s 
41746 
41747 
41750 
41751 
41752 
41753 
41754 
41755 


41756 
41757 
41760 
Gi761 
41762 


41763 
41764 


41765 
41766 
41767 
41770 
41771 
41772 
41773 
Qi774 


41775 
41776 
Q1777 


42000 
42001 


42002 
42003 
92004 
42005 
42006 
42007 
42010 
42011 


42012 
42013 
42014 
42015 
$2016 
42017 
42020 
42021 


G2022 


v81400 
060177 
o004s1 
O24ial 
125404 
000426 
034117 
175200 
151200 


175100 
054117 
034037 
125540 
151200 


000746 
OSsoLaa 


000413 
152400 
176540 
054064 
126000 
002401 
040031 
OS016! 


000403 
102121 
050146 


040152 
002060 


024101 
020007 
004463 
002060 
000211 
040152 
024074 
034073 


167000 
050105 
030075 
073401 
030105 
000670 
102120 
050135 


000635 


CMPRS: 


PLOT: 


MRSTs 


MRST1is 
ELONGs 


PRARGS 
SCORES 


RTDCD: 
TSCAN? 


HRZTBs 


THTABS 
VRTABS 


NCMNDs 
OCMND=s 


1979 


STA 
INTEN 
JMP 
LDA 
INC 
JMP 
LDA 
MOVR 
MOVR 


MOVL 
STA 
LOA 
INCOL 
MOVR 


SMP 
STA 


JMP 
Sus 
SUBOL 
STA 
ADC 
SMP 
MRST2 
STA 


JMP 
ADcZ2L 
STA 


STA 
gMP 


LDA 
LDA 
JSR 
JMP 
HTAB 
STA 
LDA 
LDA 


ADO 
STA 
LDA 
OIv 
LOA 
JMP 
Apc2t 
STA 


JMP 


0,0,3 


RTOCD 
1,CMPMD 
1,1,S2R 
RTOCco 
3,PRTYP 
3,3 

2,2 


3,3 


“ 3,PRTYP 


3,015 
trl 
are 


STOTS 
2,PLTSL 


” RTDCD 


202 

3,3 
3,ECLCT 
{yl 
QMRSTI 


2,ELNEN 
RTOCD 

0+0,SKP 
2,SCRFL 


O,ESFLI 
@PSCAN 


1,HPOS 
0,0132 
TAB 

OPSCAN 


0, ESFLI 
1,VPOS 
3,VSLEW 


3,1 
2,SVEX 
2/VRSTP 


2,SVEX 
VRTBB 
0,0 
2,OLLSL 


TESPe 


GENERAL CORPORATIUN, 


7AC1 =~1 IF JUMPER IS IN 
7SKIP IF JUMPER IS IN 
sSUMPER NOT IN RETURN 

7GET THE FLAG FOR PRINT TYPE 


#LOAD CARRY WITH 1 IF COMPRESS MODE 
sHAS TO BE SELECTED & 0 IF NUT 


7AC1l = 3 
sCARRY=1 IF COMPRESS MODE HAS 
TO BE SELECTED & 0 IF NOT 


7"PLTSL" WILL BE O IF THE PLOTTING 
sMODE HAS TU BE DESELECTED AND =1 


:IF IT HAS TO BE SELECTED 


sCLEAR AC2 
sMAKE AC3 


1 


tMAKE ACL el 


s"ELNEN" WILL BE 0 IF ELONGATED MODE HAS 
3TO BE DISABLED AND 1 OTHERWISE 


sPREPARE TO RECEIVE 2 BYTES OF ARGUMENT 
sBY OEPOSITING A =2 IN "ESFL1" 

*"SCRFL" WILL BE 0 IF UNDER SCORE 

tHAS TO BE DISABLED AND ~1 TO ENABLE 
END OF ESCAPE COMMAND SEQUENCE 


tGET THE HORIZONTAL POSITION OF THE HEAD 
7ACU = 132. 


sCLEAR THE ESCAPE FLAG 

GET THE CURRENT VERTICAL POSITION 

7GET THE NUMBER OF VERTICAL STEPS LEFT 
7TQ BE TAKEN 

VERTICAL POSITION WHERE TAB WILL BE SET 
TEMPORARILY SAVE AC2 

3GET THE NO. OF VERTICAL STEPS PER LINE 
vACL = LINE POSTION 

sRESTORE AC2 

sSET/CLEAR VERTICAL TAB 


sDLLSL WILL BE 0 FOR DESELECT 
7AND NON 0 FOR SELECT 


10041 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 
COPYRIGHT OGC, 


42023 
42024 
42025 
42026 
42027 
42030 
42031 
42032 
42033 
42034 
42035 
42036 
42037 
42040 
42041 
42042 
42043 
42044 
42045 
42046 
42047 
42050 
42051 
42052 
42053 
42054 
42055 
42056 
42057 
42060 
42061 
42062 
42063 


42064 
42065 


42066 


LP201 


PRDLL= 
040151 
004440 
101300 
040077 
004435 
034077 
163000 
040077 
004431 
040076 
004427 
034076 
175300 
117000 
054076 
176400 


‘054100 


004420 TROUT: 
024100 
107000 
044100 
030076 
006415 TRUMP: 
010076 
000401 
014077 
000767 
004406 
034031 
030100 
143000 
117404 
002003 
GETCH: 
054132 
000634 


041437 PSTOB: 


sGET THE NEXT OLL CHARACTER OR EXIT IF AC3 IS 0 


O,ESFLG ;RESET ESCAPE COMMAND FLAG 


3GET THE LAST BYTE 
sSTORE THE BYTE COUNT 


sSTORE THE BYTE ADDRESS. 
sINITIALIZE THE CHECK SUM 


sUPOATE THE CHECK=SUM 
+GET THE BYTE ADORESS 
sSTORE THE BYTE 


3GET CHECK SUM 


“0,3/SZR :SKIP IF CHECK SUM IS OK 


7G0 TO ERROR STATUS 


sCLEAR BUSY FLAG 


1979 
tPROCESS DOWN-LINE=LOAD 
STA 
JSR GETCH 
MOVS 0,0 
STA 0,OLLB 
JSR GETCH 
LDA 3,OLL8 
ADD 3,0 
STA 0,O0LL8 
JSR GETCH 
STA 0,OLLA 
JSR GETCH 
LDA 3,O0LLA 
MOVS 3,3 
ADD 0,3 
STA 3,DLLA 
SUB 3,3 
STA 3,0LLC 
JSR GETCH 
LOA 1,0LLC 
ADD Ort 
STA 1,0LLC 
LDA 2,0LLa 
JSR aPSTOB 
132 OLLA 
JMP oti 
osz OLLB 
IMP TROUT 
JSR GETCH 
LDA 3,0377 
LDA 2,O0LLC 
ADD 2,0 
AND 
JMP OPFALT 
STA. 3,OLLF 
JMP TOCLR 
STOB 


$0042 LP201 


o1 
02 
03 
04 
os 
06 
07 
08 
09 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
ai 

22 
23 
eq 
es 
26 
27 

28 
29 
30 
31 


42067 
42070 
42071 
42072 


42073 
42074 
42075 


42076 
42077 
42100 


42101 
42102 
42103 
42104 
42105 
42106 
42107 


42110 
421i 
4aii2 
42113 


122452 
001400 
150000 
050162 


102400 
030050 
073101 


054066 
035401 
137000 


126400 
152121 
151140 
122043 
000776 
021400 
145400 


010162 
142000 
041400 
002066 


TABS 


1979 


ENTER 
eACL & 
tAC2 = 
7AC3 = 


SUBO# 
JMP 
COM 
STA 


SUB 
LDA 
OIV 


STA 
LDA 
ADO 


SUB 
Aoc2L 
MOVOL 
AOCO 
JMP 
LDA 
AND 


ISZ 
ADC 
STA 
JMP 


WITH ACO 
POSITION 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 
COPYRIGHT DGC, 


= LAST TAB POSITION POSSIBLE 
WHERE THE TAB IS NEEDED 


v1 TO SET THE TAB AND 0 TU CLEAR IT 
RETURN ADDRESS AND RETURN +1 CONTAINING THE 
sAQDDRESS IN PAGE 0 WHERE THE TAB BUFFER STARTS 


1,0,S2C 
0,3 
222 
2,ARGFL 


0,0 


“2,020 


3,RETA 
3,1,3 
1,3 


1,1 
2,2,SKP 
2,2 
1,0,SNC 
ere 
0,0,3 
2,0 


ARGFL 
2,0 

0,0,3 
@DRETA 


sSKIP IF THE TAB IS WITHIN THE RANGE 


I"ARGFL" WILL BE 0 IF THE TAB HAS TO 
37BE SET AND -1 LF IT HAS TO BE CLEARED 


7AC2 = 20 

#RETURN WITH ACO = REMAINDER AND AC1 
HAVING QUOTIENT 

7SAVE THE RETURN ADDRESS 


#AC3 = ADDRESS OF THE WORD WHICH HAS THE 
3TAB BIT IN IT 

3AC1 = 0 

sAC2 = m2 


sSKIP WHEN IT 1S OVER 


*READ THE WORD WITH THE TAB BIT IN IT 
#MASKOUT THE BIT WHICH REPRESENTS THE 
?POSITION WHERE THE TAB HAS TO BE SET 
70R CLEARED 

#SKIP IF THE TAB WAS TO BE CLEARED 
SET THE B1T 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 
COPYRIGHT DGC, 


$0043 LP201 

o1 

02 

03 42114 024130 
oa 

05 42115 125005 
06 

07 42116 000541 
08 

09 42117 030005 
10 92120 147445 
11 42121 176120 
12 42122 020134 
13 

14 82123 113414 
1S 42124 000524 
16 42125 143000 
17 42126 030117 
18 

19 

20 

21 42127 026011 
22 42130 125100 


23 42131 024034. 


24 4232 151212 
25 42133 024037 
. 26 82134 030101 
27 42135 172002 
28 

29 

30 

31 42136 166041 
32 

33 42137 174400 
34 

35 42140 146476 
36 

37 

38 42141 131000 
39 42142 1541143 
40 

41 42143 050101. 
42 42144 152400 
43 62145 050167 
4a 

as 

46 82146 050111 
67 . 

48 42147 024102 
49 62150 146083 
50 42151 044102 
51 42152 125604 
52 

53 42153 000475 
54 42154 044166 
55 42155 000416 


CHRST®: 


1979 


s#xA CHARACTER START INTERRUPT WILL BRING THE 
sPROGRAM CONTROL TO THIS ROUTINE 


LOA 1,HSTFL sGET THE HORIZONTAL COMMAND THAT WAS 
sISSUED TO REACH THIS STEP 

MoV 1s1,SNR SKIP IF A COMMAND TO TAKE HORIZONAL 
3STEPS WAS ISSUED 

JMP HNOMV 3I1F NOT THEN IT MUST BE A MOVEMENT 
7BY HAND 

LDA 2,c4 rAC2 = 4 

ANDO 2/1,SNR 3;SKIP IF MOVING TO THE LEFT 

ADC2L 3,3 37AC3 = -2 

LDA 0,OT3FL 3:GET THE LAST OUT 3 COMMAND THAT 


#WAS ISSUED 
AND#& 0,2,SZR 3SKIP IF PRINT WAS DISABLED 


JMP RSTOR sOTHERWISE RETURN 
ADD 2,0 sSET BIT 13 
LDA 2,PRTYP ;GET THE PRINT TYPE. 0 FOR REG. 


sB1T 15 WILL BE 1 FOR COMP. & BIT 
370 WILL BE SET FOR ELONGATED 


IN 1,1 

LDA 1,9.PIN+1 
MOVL 1,1 #LOAD CARRY WITH HOME FLAG 
LDA 1,C10 


MOVR#  2,2,SZC ;SKIP IF NOT IN THE COMP. PRINT MODE 
LOA 1/C15 . 
LOA 2/HPOS $GET THE HORIZONTAL POSITION 
ADC 3,2,SZ2C +AC3 1S -2 FOR MOVEMENT TO RIGHT 
fAND 0 FOR MOTION TO LEFT 
+SKIP IF IN HOME AND MOVING TO RIGHT 
3OR IF NOT IN HOME AND MOVING TO LEFT 
ADCO 3,1/SKP ;INC. IF MOVING TO RIGHT & DEC. IF 
, ?MOVING TO LEFT 
NEG 3,3 ¢RESTORE THE CARRY TO WHAT IT WAS 
}BEFORE AC2 WAS CHANGED 
subcH 2,1,SEZ ;SKIP IF INSIDE HOME AND 
. 7AC1 > QR = AC2s OR IF NOT IN HOME 
: sAND ACL < OR = AC2 
MoV 1-2 ; 
MOVL#  2,2,SNC ;SKIP IF THE HORIZONTAL POSITION WILL 
$BECOME NEGATIVE 


STA 2,HPOS SAVE THE NEW HORIZONTAL POS. 
Su8 2,72. 
STA’ 2eHRCNT s;CLEAR THE FLAG KEEPING TRACK OF HOW 
’ tMANY REAL TIME CLOCK INTERRUPTS RE- 
sCEIVED SINCE THE LAST START CHARACTER 
STA 2,PRNTIN sREwINITIALIZE THE PRINT 


PINTERRUPT FLAG 
LDA 1,HSLEW 
ADCO 2,1,SNC ;SKIP IF NOT A HORIZ,. SLEW 
STA 1,HSLEW 
INCR 1,1,SZR ;SKIP IF NOT HORIZ. SLEW OR HORIZ. 
SLEW IS OVER 


SMP. RSTOR 
STA 1,HTBFL 30 OUT THE FLAG 
JMP PRTST 


01 
02 
03 
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42156 
42157 
42160 
82161 
42162 
42163 
42164 
42165 
42166 
42167 
42170 
42at71 
42172 
42173 


42174 
42175 
42176 
42177 


$2200 
42208 


42202 
42203 
42204 


42205 
42206 
42207 


42210 
42211 
42212 


42213 
Geeta 
42215 
42216 
Geer7 
42220 
42221 


42222 


42223 
42224 
42285 
42226 
42227 
42230 
42231 


O101i1 
Oe4131 
125005 
000417 
O14i3t 
00046S 
065077 
102400 
040157 
006055 
020036 
034134 
163400 
040134 


034043 
117000 
041400 
o004si 


020143 
£14005 


000516 
034113 
175415 


034006 
030037 
020114 


142453 
O350111 
156442 


010116 
122002 


PRINTS 


PRET: 


PRIST: 


PRNT1s 


000433 - 


040114 
004451 
101202 
121100 


161002 
004454 


100000 


117400 
116000 
161200 
124102 
151200 


1979 
}**ROUTINE TO PRINT DOTS ON THE PRINTER 


Isz . PRNTIN  yUPDATE THE PRINT INTERRUPT COUNTER 
LDA i,STPFL ;SEE IF STOP FLAG IS SET 
MOV 1,1,SNR ;SKIP IF IT IS SET 
JMP PRNT1 
082 STPFL 7SKIP WHEN "STPFL" = 0 
JMP RSTOR 
RTCDS sDISABLE THE REAL TIME CLOCK INT. 
SUB 0,0 
STA , 0, DSRFL : 
JSR @PSTOP ;STOP THE HORIZONTAL MOTOR 
LDA O0,C13 ACO = 13 
LOA 3,O0T3FL 
AND 3,0 MASK OUT BIT 13 
STA 0,OT3FL ;SAVE THE NEW OUT3 COMMAND 
OUT 0,33 
LDA 3, -POUT+3 
ADD 0,3 
STA 0,0,3 
SMP RSTOR 
LOA 0,PSPFL ;READ THE SWITCH TO SEE IF THE 
#PLOTTING MODE IS SELECTED 
com 0,3,SNR ;SKIP IF IT IS NOT SELECTED WITH 
zACO = ~1 
JMP PLOT! 
LDA 3/PROIR 3GET THE PRINT OIRECTION 
INCH 3,3,SNR ;SKIP IF PRINTING LEFT TO RIGHT 
gAC3 = 1 
LDA 3,¢5 rACZ = 5 
LDA 2,015 yAC2 = 15 
LDA 0,PRCNT GET THE NUMBER OF COLUMNS LEFT TO 


?BE PRINTED 

SUBOS 2,0,SNC sSKIP IF NOT ELONGATED MODE PRINTING 

LDA 2,PRNTIN GET PRINT INTERRUPT COUNTER 

sus0 2,3,SZ2C :SKIP IF ELONGATED PRINT MODE & 5 OR 
LESS PRINT INTERRUPTS HAVE BEEN 
RECEIVED WHILE PRINTING RIGHT TO LEFT OR 
tONLY ONE INTERRUPT HAS BEEN RECEIVED 
sVIHILE PRINTING LEFT TO RIGHT 
sALSO SKIP IF ERRONEQUS PRINT INTERRUPT 


18Z PRSKP sSKIP IF PRINT SKIP FLAG IS 1 

ADC 1,0,SZC :OECREMENT BUT DON’T MAKE IT NEGATIVE 

JMP RSTOR 

STA 0,PRCNT 

JSR MTRIX sREAD THE CHARACTER MATRIX 

MOVR 0,0,8ZC sSKIP IF IT WAS AN OOD PRINT INTERRUPT 

MOVL 1,0 LOAD CARRY WITH A 1 IF ELONGATEO 
sPRINT MODE IS ENABLED 

MOV 3,0,SZC 3SKIP IF NOT ELONG. PRINT MODE OR 
IF IT IS ODD PRINT COLUMN 

JSR MTRXL 

coM 0,0 

AND 0,3 

Abc 0,3 OR ACO AND AC3 

MOVR 3,0 


COML 1,1,/8ZC sSKIP IF ELONGATED PRINT MODE 
MOVR 22 


01 
02 
03 
04 
05 
06 
07 
08 
09 
10 
14 
12 
13 
14 
15 
16 
17 
18 
19 
20 
at 
22 
as 
a4 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
3a 
39 
40 
41 

42 
43 
4a 

45 
46 
47 
48 
49 
50 
51 
52 
53 
54 
55 
56 
57 
58 


s9, 


60 


42232 
42233 


42234 
42235 
42236 
42237 


4224u 
dae. 
42242 
422435 
4e24a 


42245 
42246 
42247 
42250 


42251 
42252 
42253 
42a5a 


42255 
42256 


42257 
42260 
42261 
62262 
42263 
42264 
42265 


42266 
42267 


42270 
42271 
42e72 


42273 
42274 
42275 
42276 
42277 
42300 
42301 
42302 
42303 
42304 


92305 
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024147 
125066 


115140 
020114 
030461 
157400 


030044 
173000 
041000 
034035 
O24aitt 


166404 
101005 
000721 
152400 


060277 
061201 
060001 
191404 


060177 
062601 


0350101 
150000 
020144 
101004 
0007085 
020168 
101005 


050127 
000701 


030117 
151102 
101212 


024113 
030115 
127000 
044115 
054067 
024112 
127120 
125120 
133000 
024136 


134425 


PLOTe2: 


RSTUR: 


RSTRI: 


HNOMVs 


MTRIX$ 


MTRXIS 


1979 
LDA 


MOVC 


MOVOL 
LOA 
LDA 
ANO 
Our 
LDA 
Add 
STA 
LOA 
LDA 


SUB 
MOV 
JMP 
SUB 


INTDS 
MF SP 
MTFP 
Inc 


INTEN 
RET 


LDA 
coM 
LDA 
MOV 
IMP 
LDA. 
MOV 


STA 
JMP 


LDA 
MOVL 
MOVRA 


LOA 
LDA 
ADD 
STA 
STA 


* LDA 


ADDZL 
MOVZL 
ADD 
LDA 


NEGZ 


1,SCOR 


1,4,SEZ 


0r3 
0,PRCNT 
2,€777 
2.3 
3,42 

2, ePOUT+ 
3,2 
00-2 
3,Cle 
1,PRNTIN 


341/S3ZR 
0,0,SNR 
PRET 
2,2 


2,2,S2R 


2,HPOS 
272 


-O,/PLTSL 


0,0,S82R 
PRET 

0,DELAY 
0,0,SNR 


2,HRTER 
PRET 


2,PRTYP 

202,820 

0,0,SzC 
‘ 


1,PRDIR 
2,PRADR 
at 
1,PRAOR 
3,RETS 
1,PRCHR 
1,1 

lel 

1,2 
1,DLADR 


1,3,SNR 


GENERAL CORPORATION, 


sACi WILL BE NON O IF UNDER SCORE IS 
sENABLED 

sO0ON’T SKIP IF UNDER SCORE IS ENABLED & 
IT WAS OOD PRINT POSIOTION (UNLESS 
sELONGATED PRINT MODE) 


7AC2 = 777 

FPRINT 

4 

3A3 = 12 
3GET THE COUNT OF PRINT 
7 INTERRUPTS 


tSKIP IF PRINT COUNT IS NOT 0 


sANY TIME AN ENTRY 1S MADE TO THIS 
sPOINT THE INTERRUPTS WILL BE ENABLED 


sSKIP IF INTERRUPTS ARE NOT TO 
2:86 ENABLED 


7GET STATUS OF PLOTTING MODE 
7SKIP IF NOT IN PLOTTING MODE 
DON'T SET ERROR FLAG FOR START CHAR 


7SKIP IF DELAY AFTER A STOP COMMAND IS 
sNOT OVER 
7SAVE THE CURRENT HOR. POSITION 


SKIP IF NOT ELONG. PRINT 

IF ELONGATED PRINT IS ENABLED AND 
7IT IS ODD PRINT COUNT THEN LEAVE 
sAC1 TO AO 

+GET THE PRINT DIRECTION 

7GET THE COLUMN ADDRESS 


sUPDATE THE COLUMN ADDRESS 

7SAVE THE RETURN ADDRESS 

7GET THE CHARACTER TO BE PRINTED 
*SHIFT LEFT BY 2 PLACES 


sAC1 = STARTING ADDRESS JUST IN CASE 
7DOWN LINE LOADED CHARACTER SET IS 
tBEING USED, IT WILL BE 0 IF CHAR, 
GEN. IS BEING USED 

SKIP IF USING DOWN LINE LOADED 
CHARACTER SET WITH THE CARRY = 0 


01 
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42306 
42307 


42310 


423it 
42312 
42313 
42314 
42315 
42316 


42317 


42320 
42321 


42322 


024047 
133002 


041000 


036010 
125003 
035000 
030115 
024117 
002067 


000777 


054114 
034112 


000714 


C777: 


PLOT!: 


1979 


LDA 
ADD 


STA 
IN 

LDA 
MOV 
LDA 
LDA 
LDA 
JMP 


177 


STA 
LDA 


JMP 


1, POUT+7 

1-2,SZC sSKIP IF USING ODGWN LINE LOADED 
sCHARACTER SET 

0,0,2 

3,0 +READ THE CHAR. GEN. 

3,0,PIN+O 

1,i,/SNC :SKIP IF CHAR. GEN. IS BEING USED 

3,02 

2,PRADR 

1,PRTYP 


ORETS 


3,PRCNT ;CLEAR PRINT COUNT 

3,PRCHR ;BYTE RECEIVED WILL BE THE BYTE SENT 
:T0 THE HAMMERS 

PLOTe 
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OL VRSTJ: 3%x*ROUTINE TO TAKE VERTICAL STEPS UNDER TIME 

02 sCONTROL. ENTER AT VRSTJ WITH A JSR ANO AT 

03 3TICK AFTER A TIMED INTERRUPT. 

04 42323 060277 INTOS 

05 42324 062401 SAV 

06 42325 040073 STA 0,VSLEW 

07 42326 040070 STA O,VRTIN gINIT. THE NUMBER OF VERTICAL INTERRUPTS 
08 s EXPECTED 

09 42327 176401 sus 3,3,3KP 

10 42330 014073 TICK: DSZ VSLEW ?SKIP AFTER TAKING ALL THE VERTICAL 
11 STEPS 

te 42331 000402 auMP ate 

13 42332 000420 JMP VRCHK #MAKE SURE THAT THE VERTICAL MOTOR 
14 #IS MOVING 

15 42333 054071 STA 3,VRTWT 7ZERO OUT THE VERTICAL WAIT 

16 42334 020072 LDA O,VRTFL sGET THE VERTICAL STEP ISSUED LAST 
17 42335 024053 LOA 1,C60 7AC1 = 60 

18 42336 (034050 LDA 3,020 7AC3 = 20 

19 42337 101120 MOovV2L 0,0" 

20 42340 106053 ADCO# O,1,SNC :SKIP IF BIT 9 OF ACO IS SET 

21 42341 163000 ADO 3,0 

22 42342 123400 AND 1,0 7ACO HAS THE NEXT STEP 

23 42343 040072 STA O,VRTFL :;SAVE THE VERTICAL STEP FLAG 

24 42344 010074 {sz vPOS 

2S 42345 000401 JMP etl 

26 42346 020130 LDA Q,HSTFL ;ACO = HORIZONTAL STEP COMMAND 

27 ; IN 1,6 3START THE CLOCK 

28 423547 026016 LOA 1,0,PIN+6 

29 42350 006055. JSR @APSTOP <;ISSUE AN OUT 5 

30 42351000677 JMP RSTOR 

31 VRCHK: ;**ROUTINE TO VARIFY THAT THE VERTICAL MOTOR 

32 71S MOVING 

33 42352 024070 LDA “1,VRTIN :GET THE NUMBER OF VERTICAL INTS. 
34 sNOT RECEIVED 

35 42353 166284 ADCOR 3e1,SZR ;SKIP IF UPTO 2 INT. NOT RECEIVED 
36 42354 006003 JSR. OPFALT :GU0 TO ERROR STATUS 

37 42355 034742 LDA 3,C0777 

38 42356 054071 STA 3,VRTWT sIGNORE THE VERTICAL STEPS TO BE 
39 e sRECEIVED AFTER ALL THE VERT. STEPS 
40 sHAVE BEEN TAKEN FOR 100 MSEC. 

41 42357 000671 JMP RSTOR ‘ 

4a VRINTs ¢**ROUTINE TO SERVICE VERTICAL INTERRUPT 

43 42360 020071 LDA O,VRTWT 

44 42361 101224 MOVZR 0,0,S2R ;SKIP IF A VERTICAL INTERRUPT WAS 
45 s EXPECTED 

46 42362 000666 aMP RSTOR 

47 42363 020073 LDA 0,VSLEW 

48 42364 162040 ADCO 3,0 sSKIP IF "VSLEW" WAS NOT 0 

49 42365 024070 LOA 1,VRTIN :GET THE COUNTER FOR VERT. INT. 
50 42366 166026 ADCZ 3,1,SEZ ;0EC. BUT DON’T MAKE IT 0 

51 42367 044070 STA 1,VRTIN 

52 IN 2,3 

53 42370. 032013 LDA 2,9.PIN+3 

54 462371 151103 MOVL 2,2,SNC ;CHECK STATUS GF FORMS 

SS 42372 006402 JSR @PFBY 70UT OF FORMS GO SET BUSY 

56 42373 000655 JMP RSTOR 

57 42374 040336 PFBYSs HDINT 

58 
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o1 = INTS: sINTERUPT SERVICE 

02 sSEVEN POSSIBILITIES: 

03 sCHARACTER START INTERRUPT 

04 SPRINT INTERRUPT 

0s sRTC (VERTICAL POSITION INT.) 

06 ?KEYBOARD 

07 #VERTICAL INTERRUPT 

08 *SELF TEST 

09 42375 054067 STA 3,RETS ;SAVE ACS 

10 42376 034000 LDA 3,0 

11 42377 062401 SAV 2SAVE THE WORLD 

12 42400 020067 LDA “0,RETS 

13 42401 041777 STA O,-le3 SAVE AC3 ON THE STACK 

1a IN Ori 

15 42402 022011 LDA Ord PIN+1 

16 42403 100000 com 0,0 

17 42404 030032 LDA 2,0177 

28 42405 143400 AND “2,0 sSKIP IF A VALIO INTERRUPT 
19 42406 030413 LDA 2,INTSR 

20 42407 126521 SUBZL 1el,SKP ;AC1 = 1 

2% 42410 125120 MOoVvZL 1,1 7 

22 42414 151400 INC . 2:2 zAC2 IS POINTING TO THE ADD, OF THE 
23 sINTERRUPT SERVICE ROUTINE 
24 42412 101203 MOVR 0,0,SNC ;SKIP IF THIS IS THE INT. 
2S 42413 000775 JMP 73 

26 OUT 1,6,3 ?RESET ThE INTERRUPT 

27 42414 034046 LDA 3, .POUT+6 

28 42415 137000 AbD 1,3 

29 42416 041400 STA 0,03 

30 42417 176400 SuB 3,3 

31 42420 003000 JMP a072 

32 

33 42421 042421 INTSR: . 

34 42422 042114 CRRST 

35 42423 042156 PRINT 

36 42424 042330 TICK 

37 42425 041215 KYBRD 

38 42426 042360 VRINT 

39 42427 042677 SLFTS 


01 
02 
03 
04 
0S 
06 
07 
08 
09 
10 
11 
le 
13 
14 
15 
16 
17 
18 
19 
20 
at 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
56 
37 
38 
39 
40 
4t 
42 
43 
44 
45 
46 
a7 
48 
49 
50 
Si 
52 
$3 
54 
ER} 
56 
57 
Sa 
59 


PROPRIETARY INFOR IATION OF DATA GENERAL CORPURATION, 
COPYRIGHT DGC, 
10049 LP20!1 


42430 
42431 


42ase 


42433 
4eaza 


42435 
82836 
824037 
42440 
a2gay 
G2aue2 
82443 
a2aqu 
a2uas 
42446 
42447 
42450 
424s 
42452 
42453 
42asa 
42455 
42456 


42457 
42460 


42461 
S2d62 


42463 
4auoq 
42465 
42466 
42467 
42470 
4ea7y 
42472 
42473 
“aa7a 


92475 
42476 
42477 
42500 
42501 
42502 
42503 
42504 
4250S 
42506 
42507 
42510 


92511 


60 ‘42512 


* OFLNOS 


020033 
117000 


062401 


022017 
101212 


024053 
044163 
024075 
101102 
044074 
osolai 
050122 


103122 


0%4121 
103112 
014122 
030006 
105300 
101200 
147634 
151401 
030034 
050075 


123500 
126560 


044117 
125120 


030034 
103122 
147000 
060277 
020134 
030006 
143400 
107000 
044134 
060177 


022013 
024025 
107400 
030420 
143620 
111220 
151220 
143000 
107000 
044125 
102400 
030075 


073301 
020405 


OFLNI$ 


1979 

s**kROUTINE TO SET UP THE MACHINE STATUS 
LOA 0,C7 

ADO 0,3 sADJUST THE RETURN ADDRESS 


sROUTINE TO CHECK THE MACHINE CONFIGURATION 
SAV 
IN 0,7 
LOA 0,d.PIN+7 
MOVR# 0,0,S2C ;SKIP IF AUTO SKIP FEATURE IS NOT 


s ENABLED 
LDA 1,C60 7ACL = 60 OR 48 DECIMAL 
STA 1,AUTSK 
LDA 1,VRSTP ;GET NUMBER OF STEPS FOR LINE FEED 
MOVL 0,0,SZC ;SKIP IF FORM INITIALIZE IS NOT DESIRED 
STA 1,VPOS  3SET VERTICAL POSITION COUNTER 
STA 2,CMPMD ;COMPRESSED MODE FLAG, 
STA 2,ALTMD ;AND ALT MODE FLAG. 


ADDZL 0,0,SZ2C ;SKIP IF COMPRESS MODE JUMPER IS NOT IN 
0S2 CMPMD 

ADDLA# 0,0,SZC sSKIP IF ALT JUMPER 1S NOT IN 

082 ALTMD 


LDA 2.05 ;Ac2 = 5 

MOVS  —-Ov1 

MOVR 0,0 

ANOZR# 2,1,SZR :SKIP IF 6 LINES PER INCH 

INC 2,2,SKP ;AC2 = 6 

LOA 2,C10 " sac2 = 10 

STA 2,VRSTP ;"VRSTP" HAS THE NUMBER OF STEPS NEEDED 
3FOR A LINE FEED 

ANOL 1,0 

SUsCL ty sAC1 = 1 IF COMPRESSED PRINT IS DESIRED 
70 OTHERWISE 

STA A, PRTYP 

MOVZL “te 7AC1 = 0 FOR REGULAR PRINT AND 2 FOR 
sCOMPRESSED PRINT 

LDA 2,C10  ;AC2 = 10 


ADDZL 0,0,;S2C sSKIP IF ALT 1S NOT TO BE SELECTED 
ADO 2st 


INTOS 

LDA 0,OT3FL 

LDA 2.CS sAC2 = S : 

AND 210 sMASK OUT EVERY THING BUT BITS 13 & 15 

Add Ort 

STA 1,OT3FL 

INTEN ; 

IN 0,3 sREAD THE FORMS COUNT IN DECIMAL 
LDA 0,d.PIN+3 

LDA 1,C17 zAC1l = 17 

AND 0,1 

LDA 2,C360  sBITS & THRU 11 ARE SET 

ANDZR 2,0 

MOVZR Ore 

MOVZR 2r2 

ADD . 2,0 sCONVERTING DECIMAL TO OCTAL 

ADD Onl 

STA 1,LNCNT 

Sub 0,0 

LDA 2,VRSTP ;GET THE NUMBER OF VERTICAL STEPS 

+TO0 BE TAKEN FOR COMPLETING 1 LINE 
MUL 


LOA 0,C2450 


PROPRIETARY INFORMATION OF DATA 


COPYRIGHT OGC, 


0050 LPe0l 


01 
02 
03 
04a 
0s 
06 
07 
08 
09 


42513 106415 
42514 126400 
42515 044024 
42516 002054 


42517 002450 Ca4s0: 
42520 000360 C360: 


1979 


SUB# 
Sua 
STA 
JMP 


2450 
360 


0+1,SNR 
1yi 
1,FRMFL 
OPRSTR 


GENERAL CORPORATION, 


sTEST FOR NO FORM LENGTH SWITCH 
sCLEAK ACL 


sRETURN 


PROPRIETARY INFORMATION OF DATA 
COPYRIGHT DGC, 1979 
$0051 Lpeot 


01 RTCLK: 3**COME HERE TO 
02 42521 054172 STA 3,RTSV3 
03 42522 040171 STA O,RTSVO 
04 42523 101100 MOVL 0,0 

05 42524 040173 STA 0/RTCRY 
06 42525 010167 1sz HRCNT 
07 

08 42526 020167 LDA U,HRCNT 
09 42527 034053 LDA 3,C60 
10 42530 162442 sSuBO 370,S82C 
11 

12 

13 42531 000406 . JMP RTRET 
14 4aS$2 101004 MoV 0,0,SZK 
15 42533 000412 JMP RTCLL 
16 42534 034130 LDA 3,HSTFL 
17 é 

18 42535 054174 STA 3,RTCSV 
£9 42536 004443 © JSR STOP 

20 42537 020173 RTRET: LDA 0,RTCRY 
21 42540 101200 MOVR 0-0 

22 42541 020171 LDA O,RTSVO 
23 42542 034172 LDA 3,RTSV3 
24 42543 060177 INTEN 

25 42544 002000 JMP a0 

26 

27 42545 £62404 RTCL1: -SUB 3,0,SZR 
28 ‘ 

29 42546 000771 JMP RTRET 
30 42547 040167 STA 0, HRCNT 
31 42550 034005 LDA 3,04 

32 42551 020170 LDA 0, RETRY 
33 42952 116442 SUBD 0,4,S2C 
34 

35 42553 002003 JMP @PFALT 
36 42554 010170 sz: RETRY 
37 42555 020174 LDA = 0,RTCSV 
38 

39 42556 000760 JMP RTRET=1 


GENERAL CORPORATION, 


SERVICE MICRO NOVA REAL TIME CLOCK 
7SAVE AC3 
sAND ACO 


SAVE THE CARRY 
sINCREMENT THE NUMBER OF REAL TIME CLOCK 
7 INTERRUPTS RECEIVED 


7AC3 = 60 
;SKIP IF MORE THAN 48 INTERRUPTS HAVE 
?BEEN RECEIVED SINCE THE MOTOR STARTED 


+STEPPING OR SINCE THE LAST PRINT INT. 
FRETURN FROM REAL TIME CLOCK INTERRUPT 
+SKIP IF THIS WAS THE 48TH INTERRUPT 


7GET THE LAST HORIZONTAL COMMAND THAT 
7WAS ISSUED 

sAND SAVE IT 

tRESTORE THE CARRY 


sAND THE ACCUMULATORS 


_ RETURN FROM THE REAL TIME CLOCK INT. 


SKIP IF THIS WAS THE 96TH REAL TIME 
sCLOCK INTERRUPT 


30 OUT THE COUNT FOR A RETRY 

sAC3 = 4 

GET THE NUMBER.OF RE*TRIES MADE 

aed IF LESS THAN 4 RE*TRIES HAVE BEEN 
+MAD 


s INCREMENT THE RE=TRY COUNT 
3GET THE HORIZONTAL COMMAND TU BE 
3 ISSUED 


PROPRIETARY INFORMATION OF DATA GENERAL CURPORATION, 
COPYRIGHT DGC, 1979 
10052 LP201 


o1 *  MECSTs sx*ROUTINE TO START THE HURTZONTAL STEPPER MOTOR 

02 sENTER WITH BIT 0 OF AC1 A 1 TU MOVE TO THE LEFT 

03 sAND AG TU MOVE TO THE RIGHT 

04 ?LOSES ACO AND CARRY 

os 

06 42557 175400 INC 3,3 

07 42560 102401 SUB 0,0,SKP ;ACU = 0 

08 42561 102520 SIEP: SUBZL 0,0 7ACO = 1 IF THE STEP AT A SLOW SPEED 
09 sANO 1 IF IT HAS TO STEP AT A HIGH 
10 7SPEED 

11 42562 062401 SAV 7SAVE THE WORLD 

12 42563 040167 STA “O,HRCNT sINIT THE COUNT 

13 425648 071077 RCTEN sENABLE THE REAL TIME CLOCK 

14 42565 034144 LDA 3,PLTSL 3;AC3 WILL BE =1 IF PLOTING MODE IS 
15 sSELECTED, 0 OTHERWISE 

16 42566 175622 INCZR ‘ 3,3,SZC ;SKIP IF IT IS SELECTED 

17 42567 034117 LDA 3,PRTYP ;AC3 IS THE PRINT TYPE 

18. 42570 171100 MOVL 3,2 sLUAD CARRY WITH 1 IF ELONGATED MODE OR 
19 sPLOTTING MODE 

20 42571 030102 LDA 2,HSLEW 

21 42572 151165 MOVCL 2,/2,SNR -;SKIP IF SLEW MOTION IS TO START 

22 42573 102400 SUB 0,0 sELONGATED PRINT WILL TAKE PLACE AT 
23 INC. SPEED 

24 42574 131100 MOVL 1,2 

25 42575 111100 MOVL 0,2 ;BIT 0 OF AC@ WILL BE 1 IF STEPPING 
26 TO THE LEFT AND 0 IF STEPPING 10 
27 sTHE RIGHT 

28 42576 151140 MOVOL 2.2 

29 42577 117600 ANOR 0,3 CARRY WILL GET LOADEO WITH 1 IF COMP, 
30 sPRINT AND STEPPING AT HIGH SPEED 
31 42600 141101 MOVL 2,0,SKP 

32 42601 062401 STOP: SAV 

33 42602 060277 INTOS 

34 42603 030130 LOA 2,HSTFL 3GET THE LAST HORIZONTAL COMMAND 

35 42604 040130 STA 0,HSTFL :SAVE THE HORIZONTAL COMMAND 

36 42605 034072 LDA 3,VRTFL 3GET THE VERTICAL FLAG 

37 42606 163000 AOD 3,0 ACO = FINAL OUT S COMMAND 

38 42607 034006 LOA 3,CS 7AC3 5 5 

39 42610 165620 INCZR 3,1 sAC1=3 3 
40 42611 173400 AND 3,2 sMASK QUT EVERYTHING EXCEPT BITS 13 & 15 
41 42612 117400 AND 0,3 sCARRY WILL BECOME 1 ONLY IF SIT 1S OF ONE 
42 42613 157200 ADOR 2,3 sOF THE 2 ACS IS SET 

43 42614 137605 ANDR 1,3,SNR ;SKIP IF BIT 13 OR 15 IS DIFFERENT 
44 IN AC2 OR 3 

45 42615 126400 SUB 1yt 

&6 42616 063477 SKPBN CPU sSKIP IF INTERRUPTS WERE ENABLED 

47 42617 152000 ADC 2,2 3AC2 = =1 

48 OUT 0,5,3 

49 42620 034045 LDA 3,.POUT+S 

SO 42621.117000 ADD 0,3 

51 42622 041400 STA 0,0,3 

S2 : OUT 1,673 #CLEAR PRINT AND START CHARACTER 

53 42623 034046 « LDA 3, aPOUT+6 

54 42624 137000 ADD 1,3 

S5 42625 041400 STA 0,0,3 

56 INTERRUPTS CAUSED BY CHANGE IN 

57 sDIRECTION FLAG 

58 42626 002401 JMP @PRST1 yRETURN 


S9 42627 042250 PRST1i: RSTOR 


O) 


01 
02 
03 
04 
05 
06 
07 
08 
09 
10 
M1 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
4s 
46 
47 
48 
49 
50 
S1 
Se 
s3 
54 
55 
56 
57 


PROPRIETARY INFORMATION OF DATA 
COPYRIGHT OGC, 
$0053 LP2o1 


42630 
42631 
42632 
42633 
42634 


42635 


42636 
42637 


42640 
42644 
42642 
82643 
42644 
42645 
42646- 
42647 
42650 
42651 
42652 
42653 
42654 


42655 
42656 
42657 
42660 
42661 
42662 
42663 
42664 
42665 
42666 
42667 
42670 
42671 
42672 
42673 
42674 
42675 


42676 


42677 
42700 
42701 
42a702 
42703 
42704 
42705 
42706 
42707 
42710 
42711 


024061 
125200 
060277 
024534 
125200 


125162 


044134 
060177 


050043 
133000 
041000 
001401 
062401 
030033 
020022 
142023 
002054 
020040 
030032 
112415 
020052 


040040 
010040 
014041 
000413 
020007 
101400 
040041 
020012 
101400 
112415 
020052 
040040 
040012 
020035 
024031 
122000 
Ou2ados 


041233 


026014 
127112 
002054 
102620 
040175 
020052 
040040 
040012 
020007 
040041 
002060 


BELL: 


TESTS: 


LIND: 


POAT 
SLFTS: 


1979 


LOA 
MOVR 
INTOS 
LDA 
MOVR 


MOVCL 


STA 
INTEN 
OuT 
LDA 
AbD 
STA 
JMP 
SAV 
LDA 
LDA 
ADCZ 
JMP 
LOA 
LOA 
SUBH 
LDA 


STA 
1s2 
0S2 
JMP 
LDA 
INC 
STA 
LOA 
Inc 
SuBA 
LDA. 
STA 
STA 
LDA 
LDA 
AOC 
JMP 


STDE 
IN 
LDA 
ADDL# 
JHP 
SUBZR 
STA 
LOA 
STA 
STA 
LDA 
STA 


_oMP 


1,8LCNT 
Yel 


1,0T3FL 
1,1 


1,1,S2C 
1,0T3FL 
1,3,2 


GENERAL CORPORATION, 


3GET THE COUNTER FOR THE BELL 
sCARRY IS 1 IF IT WAS ODD & 0 IF EVEN 


sAC1 = LAST OUT 3 COMMAND ESSUED 
7BIT 0 IS THE LAST CARRY & NOW THE 
CARRY HAS BIT 15 OF LAST OUT 3 
sCOMPLEMENT SIT 15 AND SKIP IF 
7THE HELL COUNT WAS EVEN 


RING THE BELL 


2, POUT+3 


1,2 
0,02 
1,3 


2,C7 


sRETURN 
#SET UP FOR RETURN 
sLUAD AC2=7 


0,FIFOB+2 #LOAD ACO WITH FIFOB 


2,0,SNC 
OPRSTR 
0, «POUT 
2,C177 
0,2,SNR 
0,C40 


0, POUT 
POUT 
oPOUT+1 
LIND+1 
0,0132 
0,0 


TEST IF FIFO8 1S FULL 
YES, RETURN TO SCAN 
?LQAO ACO WITH CHAR 
sLOAD AC2=177 

?TEST FOR LAST CHAR 
GET FIRST CHAR 

xIF IF WAS LAST CHAR 
REPLACE CHAR 

7UPDATE CHAR 

?COUNT # CHAR IN LINE 
:NOT EWD OF THIS LINE 
3GET LINE LENGTH 


0, .POUT+! RESTORE LINE LENGTH 


“0, oPINt2 


0.0 
0,2,SNR 
0,C40 
0, POUT 


0, PIN+2 


0,C12 
1,C0377 
1,0 
OPDAT 


1,4 


3GET CHAR THAT STARTEO LINE 
UPDATE CHAR COUNT FOR NEXT LINE 
7TEST FOR LAST CHAR 
START WITH FIRST CHAR AGAIN 
sPUT CHAR FOR START OF NEXT LINE 
#REPLACE UPDATED CHAR 
PUT 12 IN ACO FOR LINE FEED 


sMAKE ACO LOOK LIKE DATA OF IN2 
3G0 TO ROTTO ROUTINE TO 
sPUT CHAR IN FIFOS8 


*GET MACHINE STATUS 


1,O.PINeG 


1,1,8ZC 
@PRSTR 
0,0 
0,STFLG 
0,C40 
0,.POUT 


0, .PIN+2 


0,D132 


sARE WE OFF LINE 
7NO RETURN 
sMAKE ACU EQUAL TO 100000 
7SET SELF TEST FLAG 
3GET CHAR TO START LINE 
7SAVE THE CHAR 

sSAVE INITIAL CHAR 
3GET LINE LENGTH 


0, POUT+! sSET UP LINE LENGTH 


@PSCAN 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 
COPYRIGHT DGC, 1979 
$0054 LP201 


01 si INITA? INITIALIZATION BLUCK TU BE MOVED TO LOCATION 1 
02 3IN RAM SPACE, 

03 

04 042711 ZREL Seni DISTANCE THIS BLOCK MUST BE MOVED vDUWN, 
OS 42712 042375 INTS sMUST BE 1 

06 42713 042521 RTCLK *7LOC. 2 REAL TIME CLOCK INI. VECTOR 
o7 000003 PFALI =.-ZREL 

08 42714 040375 HELP STACK ERROR OR SOME OTHER FAULT 
09 000004 RINIT =.e°ZREL 

10 42715 040043 Init 

11 000005 c4 S.-ZREL 

12 42716 000004 4 : 

13 000006 C5 =.°ZREL 

14 42717 000005 S 

15 000007 0132 =.eZREL 

16 42720 000204 13e. 

17 000010 .PIN =.eZREL 

18 4272: 037770 37770 

19 de7T22 037771 37771 

20 42723 037772 37772 

2% 42724 037773 37773 

22 42725 037774 $7774 

23 42726 037775 37775 

24 42727 037776 37776 

25 42730 037777 $7777 

26 

e7 

28 000020 FIFOB =.°ZREL ¢MUST BE AT LOCATION 20 
29 42731 002777 3000-1 

30 42732 000000 u 

31 42733 003000 3000 

32 42734 001020 BLFOB2 

33 

34 000024 FRMFL =.°ZRKEL 

35 000024 AUTIN S.°ZREL 

36 42735 007767 7767 tMUST BE AT AN AUTO INC, LOCATION 
37 000025 C17 S=.-ZREL 

38 000025 FIFOA =.°ZREL 

39 42736 000017 20-1 

40 42737 000000 0 

41 42740 000020 20 

42 000030 C1000 S.°ZREL 

43 42741 001000 BIFOAx2 

4g 

45 000031 C377 =.~ZREL 

46 42742 000377 377 

a7 000032 C177 =,°ZREL 

98 42743 000177 177 

49 000033 C7 =.e°ZREL 

SO 42744 000007 7 

Si 000034 C10 =.<°ZREL 

S52 42745 000010 10 

53 000035 Cia =.°ZREL 

54 42746 000012 t2 

ss 000036 C13 =.°ZREL 

56 42747 000013 13 

57 000037 C15 =.-ZREL 

S58 42750 000015 15 

s9 000040 .POUT S.°ZREL 


60 82751 040000 40000 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 


CUPYRIGHT OGC, 


0055S LPegl 


o1 
02 
03 
04 

05 
06 
07 
08 
09 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
at 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
a4 
42 
43 
4a 
45 


42752 
42753 
42754 
42755 
42756 
42757 
42760 
42761 
42762 
42763 
42764 
42765 
42766 
42767 


42770 


4a77.- 


42772 
42773 
42774 
4271S 
42776 


044000 
050000 
054000 
060000 
064000 
070000 
074000 
000050 
000050 
000020 
000051 
000033 
0000S2 
000040 
000053 
000060 
900054 
042250 
000055 
042601 
000056 
042561 
000057 
042557 
000060 
040470 
000061 
010000 
000062 
177777 
000063 
177777 
000064 
000001 
000065 
000002 
042777 
000001 


PFIFS 
Ceo 


C33 
cay 
C60 
PRSTR 
PSTOP 
PSTEP 
PDECS 
PSCAN 
BLONT 
LINES 
CHRDY 
ECLCT 
C2 


END 
ROM 


1979 


84000 
50000 
54000 
60000 
64v00 
70000 
74000 
=.°ZREL 
=.coZREL 


=BEGIN+3000-. 7ROOM REMAINING IN ROM (MUST BE POS), 
LAST LOCATION CONTAINS 40000° WHEN 

sMACHINE IS POWERED UP HARDWARE SENDS 

7CPU TO LAST MEMORY LOCATION BY DE~ 

sFAULT CPU JUMPS TO LOCATION CON- 

sTAINED HERE AND STARTS EXECUTION 

3OF THE PROGRAM AT 40000° 

sEND OF THE INITIALIZATION BLOCK 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 
COPYRIGHT DGC, 1979 
$0056 LP20i 


«00001 TOTAL ERRORS, 00001 FIRST PASS ERRORS 


PROPRIETARY INFURMATION OF DATA GENERAL CORPORATION, 


COPYRIGHT DGC, 


0057 


ALTMD 
ALTNT 
ARGEX 
ARGFL 
ARGMN 
AUTIN 
AUTSK 
BACK 

BASE 

BBUF 

BEGIN 
BELL 

BIFOA 
SIFOB 
BLCNS 
BLCNT ° 
BUFST 
BYFLG 


cio 


c100 
c1000 
c105 
C117 
Cla 
C13 
C131 
Cis 


ci? 
C177 


Ce 
Ceo 
cai 
C23 
c2450 
C3000 
C33 
C360 
C377 


c4 
cao 


ca4 


cs7 
cé0 
c7 


c74 
C76 
C777 
CARIG 
CHAOR 
‘CHCNT 
CHROY 


LPeo1 


000122 
041724 
041531 
000162 
041512 
000024 
000163 
000110 
041641 
000003 
040000 
042630 
000400 
000410 
040636 
000061 
000176 
o00201 


000034 


040215 
000030 
041454 
041626 
000035 
000036 
041453 
000037 


000025 
000032 


000065 
000050 
040205 
040407 
042517 
080311 
000051 
042520 
000031 


000005 
000052 


040415 
000006 
040405 
900053 
000033 


040410 
040404 
042317 
040176 
000156 
000107 
000063 


1979 


1u/iag 
26/41 
35/41 
11/478 
35/4808 
14/18 
11/508 
9/5048 
37725 
B/10# 
14/054 
20/08 
13/188 
13/198 
24/06# 
22/07 
12/194 
12/25# 
25/23 
14/17 
S4/Sin# 
17/078 
19/19 
Sasai# 
36/17 
38/60 
15/41 
34/408 
15725 
54/574 
31/33 
25/05 
53/22 
19/26. 
29/12 
16/554 
19729 
49/60 
16/07 
24/45 
497/49 
14724 
31/08 
18/54 
14/31 
53/36 
20/108 
16/43 
20/02# 
22/58 
18/57 
39/43 
20/058 
19/59 
45/08 
15/55 
11/374 
9/478 
16/18 


39/37 
39/358 
36/0448 
36/09 
377/07 
54/3548 
16/30 
17/al 
38/04 
27/29 
55/38 
53/014 
54/43 
34/32 


22/09 
19720 
19/23 
a7s4ay 
15/27 


19750 
S4/42n 
35/52 
38/144 
45/14 
16/20 
35/749 
25/23 


49/47 
30/06 
S4/47%# 


55/7354 


29/48 
19/32 
20/048 
$0/06# 
18/508 
31/25 
50/07H 
19/22 
31/14 
19/03 
28/27 
53/51 
21/46 
22/33 
22/40 
87/17 


. 21/15 


49/02 
22/16 
20/014 
96/138 
16/04 
32/43 
17745 
22/27 


49/16 


36/10 


49/11 
24/28 
38/258 
34/18 


26/35 
27/44 
19/30 
27/46 
26/12 


19/56 


53/39 
a5/ai 


26/17 


SG/378 
30/30 


4a/i2 


35/22 


21/41 
34/26 
437/09 
30/18 
55/134 
22/32 
44/32 


49/10 
26/07 
53/17 


47/37 
16/25 
33/19 
21/37 
23/29 


49/20 


42/09 


26/23 
38/53 


33/27 
21/43 
31/36 


54/538 
31/37 


31/39 


32/01 


47/18 


55/114 


2e/e4 
37/55 
51/31 
31/55 


49/21 
51/09 


26/36 
54/494# 


16/474 


24/08 
23/44 


42/28 


38/54 


53/01 
21/50 


43/23 


44/13 
40/13 


37/31 


55/094 


23/19 
41/30 
S4/1t# 
32/04 


49/40 


S5/15# 
28/33 


24/10 
24/01 


55/278 
22/34 
49/26 


54/554 
43/25 


39/50 


23/45 
53/40 
35/06 
52/38 


33/25 


26/21 
24/49 


22/59 


49/35 


44/33 


48/17 


27/39 
S4/45# 


53/24 


54/138 


-39/09 


25/04 


00s 


CHRST 
CLRBS 
CLRIB 
CMADR 
CHNDE 
CMNDS 
CMPMD 
CMPRS 
cPo 
Ot28 
0132 


DECST 
DELAY 
Oso 


OISt 


DLAODR 
OLCHR 
OLFLG 
DOLLA 
OLLB 
DLLC 
OLLF 
OLLSL 
DSCNC 
OSRFL 
OSRTM 
OTAS] 
ECLCT 
eCMD 
ECMND 
ELNDS 
ELNEN 
ELNSL 
ELONG 
EMPT1 
EMPTY 
END 
ESAR1 
ESC3 
ESCEX 
ESCHK 
ESCLP 
ESCmD 
ESCP1 
ESCP2 
ESCP3 
ESCST 
ESCSV 
ESFL1 
ESFLG 


EXTBL 
FCMNOD 
FIFOA 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 


COPYRIGHT DGC, 


8 LPeoL 


o4aii4 
041421 
041667 
041620 
oouLal 
000140 
000121 
041750 
040t26 
040406 
000007 


042557 
000164 
177766 


000000 


000136 
041653 
000137 
000076 
000077 
000100 
000132 
000135 
040361 
000157 
040541 
000160 
000064 
041665 
000154 
041656 
000161 
041655 
041774 
041023 
040417 
082777 
041705 
041413 
041556 
041455 
041566 
000153 
041471 
041473 
041500 
040467 
041555 
000152 
000151 


043641 
041661 
0000a5 


1979 


25/20 
43/018 
32/26 
$8/598 
37/19 
10/584 
10/554 
10/128 
38/29 
14710 
20/038 
17/41 
54/158 
52/018 
11/534 
37745 
58/20 
$7749 
38/32 
10/484 
36/20 
10/514 
9/25# 
9/274 
9/298 
10/378 
10/454 
19/7388 
11/408 
19/41 
11/4en 
30/11 


"38/18 


11/3148 
S8/16 
11/444 
38/16 
58/28 
24/20 
21/0248 
9/04 
36/08 
$1735 
26/42 
35/018 
37/148 
11/298 
35/168 
35/20# 
33/39 
21/5448 
30/40 
11/25# 
1i/228 
38/58 
38/268 
36/18 
30/35 


25/32 
48/354 
32/33 


37725 
36/15 
33/38 
40/04 
40/04# 
14/38 
21/17 
17/724 


55/24 
22/05 
38/14 
38/21 
38/26 
38/33 
25/53 
38/31 
25/Se 
41/21 
41/05 
41/18 
31/13 
31/56 
22/53 
19/43 
22/4948 
19/39 
32/18 
38/574 
33/12 
38/428 
17/ee2 
38/414 
40/284 
24/53 ° 
26/43 
SS/37a8 
39/164 
33/378 
37/034 
35/19 
37/40 
33/09 
38/48 
38/44 
35/254 
24/23 
37/024 
21/54 
31/18 
39/24 
38/54 
38/478 
54/388 


28/08 
33/22 


37/41 
31/13 
35/36 
49/15 


16/014 


25/43 


22/06 
38/15 
38/22 
38/27 
38/34 
45/55 
38/378 
38/37 
41/13 
41/07 
41/20 
41/36 
40/55 


22/48 


19/45 
$2/55 


35/31 
25/55 


26/434 


35/55 
35725 


24/40 
33/43 
41/02 


55/31# 
33/8448 
38/048 


35/47 
49/18 


39/28 


45/35 
38/16 
38/23 
38/28 
38/55 


41/16 
41/09 
41/22 


22/54 


22/38 
33/33 


40728 


35/29 


36/11 
35/15 


37/01 


37/11 


40740 


38/17 
38/538 
38/29 
38/S4# 


41/23 
41/27 
4i/31 


31/07 


38/42 


40/36 
35/18 


53/30 


38/18 


38/30 


41725 


Savi 


40/24 


40/44 
35/720 


53/54 


38/19 
38/31 


55/334 


35/46 


00s 


FIFOB 
FRMFL 
GET 
GET1L 
GETe2 
GET4 
GETCH 
GOTIT 
GTIT1 
GTITe2 
HDINT 
HELP 
HNDMY 
HPOS 


HRCNT 
HRTAB 
HRTER 
HR2TB 
HSLEW 


HSTFL 


HTAB 
HTBFL 
THTAB 
IN 


INO 
INY 
IN2 
IN3 
ING 
INS 
IN6 
IN7 
INILP 
INIT 
INITA 
INTRT 
INTS 
INTSR 
1833 
ITAB 
KEYTO 
KEYT1 
KEYT2 
KEYT3 
KEYTS 
KEYTB 
KYBRO 
LOSPC 
LFTIN 
LFTPR 
LI 
‘LIFO 


PROPRIETARY INFURMATION OF DATA GENERAL CURPORATION, 


COPYRIGHT OGC, 


9 LPe01 


000020 
o00024 
041033 
041035 
041045 
040416 
042064 
040662 
040674 
040716 
040336 
040375 
042257 
0v0101 


“000467 
041714 
000127 
042002 
ou0loe 


000130 


o0vall 
000166 
042006 
006756 


007115 
007057 
007043 
007073 
007062 
007076 
007120 
007123 
040004 
040043 
042712 
040102 
042375 
O424at 
041416 
041723 
041306 
041174 
041406 
041407 
041340 
041335 
041215 
000123 
040056 


040271 © 


000001 


040653 


MC 


MC 
MC 
MC 
MC 
MC 


Mc 
MC 


1979 


23/02 
16/02 
17/06 
20/11 
24/34 
20/3148 
41/03 
24/e2i 
24/04 
25/03 
19/178 
19/S3# 
43/07 
Q/318 
45/26 
11/608 
35/60 
10/278 
56/26 
9/338 
28/14 
10/518 
47/26 
1e/31# 
11/578 
40/438 
8/078 
22/14 
43/20 
$3/45 
46/068 
15/05# 
14/308 
23/218 
19/258 
30/298 
47/288 
49/078 
18/118 
15/01# 
9/04 
15/10 
48/018 
4B/19 
31/28 
39720 
31/47 
30/028 
32/09 
31/60 


31/32 


30/10 
50/2S# 
10/168 
15/07 
15/38 
8/0848 
24/14 


53/18 
16/15 
24/16 
24/16 
27/248 
23/36 
41/06 
24/368 
24/39 
25/108 
Q7T/57 
54/08 
45/308 
15/29 
43/41 
US/43 
38/44 
15/32 
BO/39H 
15/26 
43/48 
18/52 
51/16 
314/51 
23/51 


14/729 
23/09 
46/05 


15/12 
31/04 
33/41 
21/06 


14/15 
45/09 
14/48 
15/14 
54/05 
48/334 
33/408 
39/328 
31/564 
32/16 
33/298 
33/308 
32/328 
3a/298 
48/37 
Basti 
15/164 
17/87 
27/24 
24/ase 


54/284 
16/26 

27/018 
27/168 


41/10 


2q/s1a 


16/47 
45/30 
51/06 
359/248 
24/58 


17/15 
43/50 
21/31 
52/34 
39/31 
28/15 


15704 
23/20 
47/27 
15/19 


47/53 
22/15 


54/10 
54/0148 
15/17 


35/37 
33/35 


33/06 


18/234 
34/12 


50/03 


41/12 


17/58 
51/08 
45/38 


18/07 
52/20 
25/19 
$2/35 
40/43 
43/54 


15/11 
24/36 
47/52 


“43/21 


49/46 
23/10 


15/21 


35/59 


33/29 


34/17 


54/3448 


41/19 


2i/io 
51/30 


18/45 


28/1 


15/18 
30/28 
48/14 


48/15 


24/37 


15/30 


35/07 


41/29 


25/40 
Se/ile 


23/52 


36/21 


19724 
31/03 
49/06 


53/46 


15/408 


41/358 


40/39 


28/09 


43/03 


21/05 
33/40 
ag/a5 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 
COPYRIGHT DGC, 


0060 LP20t 


LIND 
LINES 
LNCNT 
LNEND 
LNFR1 
LNFRe 
LANFRM 
LNSIZ 
Lo 
LOBE 
LTOFL 
MASK 
MCINO 
MCINI 
MCIN2 
MCIN3 
MCING 
MCINS 
MCING 
MCIN7 
MCOTO 
MCOT1 
mcoT2 
MCOT3 
MCOTS 
MCOTS 
MUOT6 
MCOT7 
MCPLO 
MCPLI 
MCPL2 
MCPL3 
MCPL4 
MCPLS 
MCPL6 
MCPL? 
MRST 
MRSTL 
MRST2 
MSKOT 
MTRIX 
MTRXL 
NCMND 
NOMUR 
NXTLN 
OCMND 
OFLNO 
OFLN1 
OFLN2 
OFLST 
OFRET 
OT3FL 


OTwo 
QUT 


outT1 
ouTe 


042672 
000062 
o001es 
041342 
040326 
040443 
040437 
000126 
000002 
041054 
000177 
000000 
000001 
000001 
000001 
000001 
ov000! 
000001 
000001 


000001 : 


000000 
000001 
ooooul 
000001 
000001 
000001 
000001 
000000 
000000 
000000 
000000 
000001 
000000 
000000 
000000 
000000 
041766 
041773 
040031 
041060 
042270 
042277 
042020 
041464 
040136 
042021 
042430 
042432 


041113 - 


040455 


040506 - 


000134 


040367 


006774 


00706S 
007046 


MC 


Mc 
MC 


1979 


53/29 
16/750 
10/238 
31/45 
19/09% 
19/11 
21/13 
10/25# 
8/098 
e7/sin 
12/212 
8/078 
8/078 
8/074 
8/078 
8/0748 
8/078 
B/07# 
B/07# 
8/078 
8/078 
8/07# 
8/07# 
8/078 
8/078 
8/078 
8/0748 
8/078 
6/07H# 
8/07# 
8/07# 
‘8/0748 
8/0748 
B/0T# 
8/078 
B/078 
38/55 
40/26 
14/3848 
27/39K 
44/48 
44a/S4 
38/19 
35/128 
16/108 
$B8/19° 
23/07 
17701 
26/20 
21/7438 
21/47 
10/¢ex# 
44/16 
19/4648 
8/078 
59/53 
19/548 
14/334 


33/398 - 


17750 
39/19 
32/558 
21/729 
19/16 
21/248 
30/05 
23702 


16/48 

a7/17 

46/068 
15/0S# 
14/308 
23/218 
19/25# 
30/2948 
47/282 
49/078 


19/348 
14/338 
39/S44# 
45/1148 
S2/49# 
14/268 


14/37# 


“ao/2ax 


40/27# 
40/27 


45/41# 
45/508 
40/5448 
37/34 
19708 
40/558 
49/018 
49/0448 
28/224 
22/18 
22/192 
15/43 
49/39 
19/57 
14/25 
4a/iT 
23/48 
19/47 


26/49 
49/55 


21/308 


32/45 
24/31 


19709 
27/26 


tS/1e 
31704 
33/41 
21706 


23/48 
19/47 
4U/1B 


48/27 


28/19 


19/45 
49/43 
19760 
14/32 
45/10 


22/42 


32/10 


33/10 
24/33 


22/723 
34/13 


15/19 


47/53 
22/15 


22/42 
S3/1e 


$e/53 


39745 
53/04 


19/33 
98/26 


32/37 


33/31 
27/18 


22729 


4a/at 


49/46 
23/10 


39/52 
53/09 


19/46 
52/48 


35730 


27/22 


23/46 


48/15 


24/37 


43/ile 


22/41 
Se/S2 


55/294 


34/10 


26/719 


53/46 


4as14 


23/47 
53/11 


006 


OUTS 
ourTd 
OUTS 
OUTS 
PALIN 
PBELL 
PCLRB 
PDAT 
PDECS 
PESC 
PESCT 
PESOC 
PFALT 
PFBY 
PFIFA 


PFIFB- 


PFMD 

PFSS 

PFSSI 
PGET 

PHTAB 
PINIT 
PLMOD 
PLOT 

PLOT! 
PLOT2 
PLTFL 
PLTSL 
PNXT 

PNXIL 
POFLN 
POFLO 
PPPUT 
PPRBG 
PPUT1 
PRADR 
PRARG 
PROG 

PRCHR 
PRENT 


PROIR 


PROLL 
PROTT 
PRET 

PRINT 
PRNT1 
PRNTI 
PRSKP 
PRSTL 
PRSTR 


PRIST 
PRTYP 


PSADR 
-PSCAN 


PROPRIETARY INFORMATION OF DATA GENERAL CURPORATION, 
COPYRIGHT DGC, 


1 Le2oi 


007101 
007107 
007126 
007035 
041021 
040413 
041554 
042676 
000057 
041230 
040652 
041022 
000003 
042374 
041223 
000050 
000120 
040127 
040165 
040214 
041722 
040050 
041663 
041764 
042320 
042236 
000142 
OovLa4 
040325 
O411t1 
040210 
040561 
041227 
040224 
041214 
000115 
041776 
0410148 
000112 
000114 


000113 


042023 
040411 
042170 
0421356 
042200 
00011: 
o00116 
042627 
000054 


042173 
000117 


000155 
000060 


1979 


$9/S4R 
a5/118 
52/49n 
14/268 
25/35 
20/084 
$5705 
53/42 
15/08 
30/4048 
24/234 
24/44 
41/34 
47/55 
27/16 
24/30 
10/1048 
16/024 
16/28 
16/52 
38/59 
15/098 
38/22 
38/54 
44/28 
45/084 
11/014 
11/06# 
19/088 
25/25 
14745 
25/078 
30/34 
1//198 
30/19 
10/024 
38/31 
17/19 
9/568 
9/60# 
45/07 
9/582 
45/46 
38/20 
20/064 
44/138 
44/018 
44/06 
9/534 
10/044 
$2/58 
30/38 
53/48 
43/55 
10/078 
45741 
11/348 
esis 


44/18 


48/27 
26/418 
22708 
35/16 
53/444 
18/60 
31/21 
24748 
26/428 
47/36 
47/578 
30/35# 
e7/14 
19/17 
16/38 
16/37# 
16/58 
39/518 
15/33 
38/50# 
40/188 
46/154 
46/18 
31/29 
17/38 
19/15 
28/198 
17/018 
24/06 
30/39H 
187/50 
30/228 
26/10 
38/32 
26/4568 
25/38 
21/01 
46/15 
15/35 


41/0148 
23/05 
45/19 
48/35 
44/2348 
43/46 
26/31 
S2/59# 
31/54 
SS/17# 
44/168 
18/23 
46/10 
32/48 
25/30 


53/12 


52/53 


37/018 
26/38 


51/35 


34/07 
21/51 


17704 


38/50 
25/26 


45/47 
40/324 


28/26 
25/01 


18725 


45/34 


44/03 
44/44 


32/03 


25/58 
49/32 
33/15 
26/35 


39/02 


55/23% 


S4/07# 


55/064 
24/51 


17/0648 


40/18 


45/49 


45/51 


26/18 


24/11 


45/39 


44/37 


33/28 


- 26/02 


52/17 
26/40 


39/30 


17/16 


45/32 


46/09 
46/16 
28/31 


25/07 


45/15 


33/44 


40/07 


26/47 


Se/ia 


44/34 


25739 


50704 


40/12 


28/36 


BasuT 


“a7e9 


33/20 


43/17 


36/12 


006 


PSFLG 


PSLCH 
PSPFL 
PSTEP 
PSTQb 
PSTUP 
PSTPL 
PTBCA 
PTEST 
PULS3 
PULSE 
PUT 
PUTL 


PVSTP 
PVTAB 
PVURS 
ROTTO 
RETA 


RETRY 
RETS 
RINLT 
RITPR 
RNBL1 
RNBLL 
ROM 
RSTOR 


RSTR1 
RTCLL 
RTCLK 
RTCRY 
RTCSV 
RTDCD 


RTOFL 
RTOP 

RTRET 
RTSND 
RTSVO 
RTSV3 
SCAN 


SCANO 
SCAN1 
SCAN2 
SCANS 
SCANG 
SCANS 
scOR 

SCORE 
SCOTH 
SCRFL 
SERBY 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, 


COPYRIGH! DGC, 


2 LP20t 


000124 


040562 
000143 
000056 
042066 
000055 
041122 
O40erl 
040412 
007054 
007016 
041422 
041424 


040223 
041713 
040651 
041231 
000066 


000170 
000067 
000004 
040270 
041410 
0411477 
000001 
042250 


042251 
042545 
042521 
000173 
000174 
042000 


041007 
040042 
042537 
040402 


000171" 


000172 
040470 


040566 
040621 
041012 
040546 
040563 
040557 
000147 
041777 
040616 
000146 
040345 


MC 
Mc 


1979 


39/21 
10/18 
32/50- 
25/068 
11/048 
15/16 
41/24 
15/15 
25/48 
15/51 
20/0748 
14/374 
8/078 
30/39 
$0/22 
34/078 
16/46 
39708 
e4/2e# 
20/06 
9/06# 
30/32 
42/15 
12/05# 
9/7088 
14/46 
15/36 
33/24 
26/32 
25/368 
43/15 
47/41 
45/228 
Si/25 
51/018 
i2/12H 
12/148 
38/39 
40/368 
26/298 
14/08 
51/13 
19/59# 
12/078 
12/10# 
18/49 
22/0148 
22/57 
23/15 
26/32% 
22/47 
23/01 
25/058 
11/168 
38/53 
23/43 
11/138 
19/248 


40/37 
307048 
32/52 
23/57 
lo/4) 
26/39 
41/398 
19754 
28/208 
17/028 
23/28 


14/36 
34/0148 
32/32 
35/23 
17/182 
39/228 
24/57 
31/018 
14748 
30/37 
42/51 
18729 
40/35 
15/34 
16/49 
33/312 
30/058 


43/53 
47/46 


51/2748 
54/06 
5i/05 
51/18 
39/17 


28/24 
14/488 
51/208 
23/17 
51/03 
51/02 
19/06 
23/60 
23/06 
23/40 
28/17 
22/554 
23/098 
es/ie 
25/51 
40/34# 
23/478 
25/50 
21/52 


40/42 
30/14 
33/03 


16/45 
55/214 


21/35 


32/36 


16/01 
34/09 


51/32 
30/36 
15/740 
18/05 


44/08 
47/S6 


51/20 
51/37 
39/42 


28/30 
51729 
51/22 
51/23 
19/52 
35/26 


23/134 
25/514 


45/01 


40/34 


53/56 
31/48 
33/30 


26/48 


4au/le 


33/04 


23/18 
34/25 


51/36 
45/50 
26/46 
18/224 


a4u/e2l 
52/59 


40/03 


51/39 


21/04 


55/7258 
32/21 
35/02 
44/23 


47/29 


33/11 


23/41 
34/38 


46/11 
54/094 


44/46 


55/18 


40/06 


21/34 


32/23 32/31 
39/26 


55/198 


33/14 33/17 


29/10 29/50 
35/01 35709 


48709 48/12 


45/208 477/30 


40/21 40/30 


2a1/42 21/535 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION, PROPRIETARY INFURMATION OF DATA GENERAL CORPURATION, 
COPYRIGHI DGC, 1979 CUPYRIGHT DGC, 1979 
0063 LP201 0064 LP201 
SKAU 040132 16/054 16/36 VRTAB 042007 36/27 «=40/448 
SLCHK 040312 16/528 23/08 VRTBB 041707 39/18 40/53 
SLFTS 042677 46/39 «953/458 VRTER 000133 10/408 
SNBY 040342 19/18 «19/244 19755) 9 21745 VRTFL 000072 © 9/15# 47/16 47/25 52/36 
SNBYA 040340 19/198 20/09 . VRTIN 060070 9/108 9/41 47/07 = 47/35 T4499 AT/S1 
SNBYZ 040414 20/098 23/04 VRTTB 040112 15/48# 16/23 
SNCL 040462 21/4948 23725 VRTWT 000071 9/t2H 22/10 . 22/12 47/15 = 47/3B AT /43 
STAK 040204 14722 = 46 /54# VSLEW 000073 Q/17# 21/24 25/12 36/24 40/46 487/06 47/10 
STOE 041233 31/054 53/44 47/87 
STEP 042561 52/0848 55/22 VTAB 000202 12/274 15/52 39/22 
STFL1 041355 32/42 9 32/S2H VUCNS 040175 15/59 16/06 16/468 18/32 
STFLG 000175 . 42/7178 22/730 23/26 53/50 . VUFLG 0U0145 11/098 18/30 2i7ai 24/54 
STOB 041437 $2/25 32/47 32/51 34/208 35/35 41739 VURST 040274 18/284 24/22 
STOP 0482601 51/19 Se2/32# 55/20 VUSLU 040301 18/348 21/22 
STOTS 041731 39/44 40/17 VUTIM 000165 11/S5# 18/33 21709 ai/i2. 
STPi 040321 16/12 = 19/014 28/20 ZCMND 041660 38/20 38/468 
STPFL ‘000131. 10/338 19/04 23/58 44/04 44/07 ZREL 042711 Sus0d# 54/07 S$4/09 S4/11 54/13) «S415 54717 
SVEX 000105 9/4288 9/44 35/13 35/21 9935/24 37/08 37/747 . 54/28 58/34 S4/35 S4/37 S4/38 S4/42 54/45 
40/49 = 40/52 54/47 54/89 «54/51 = S$4/53° 4/55) S4757)— 54/59 
SVTBL 041627 38/148 38/53 55/06 55/09 SS5/11 SS/13  SS/15 55/17 55/19 
SWTIM 000150 11/194 16/08 . 21/25 21/30 25/17 55/2) 55/23 S5/2d 55/27 55/29 55/31 55/33 
TAB «042067 39/29 «39/52 «= usta olk 35/35 
TBCAL 041130 17/02 =. 29/018 31749 , »PIN 000010 144/30 «15705 15/12 15/19 19/25 21/06 22/15 
TBCLO 041155 29/368 29/43 25/10 23/21 =U 37) = 30729 «1/08 = 335/K1 = Bat 
TBCL1 041156 29/32 29/378 - 46/06 «47/28 47/53 48/15 49/07) 9/46) 53/33 
TBCLe 041165 29/34 297454 53/38 53/46 53/53 SA/L7# 
TBCL3 041172 29/40 29/508 «POUT OU0U040 14/26 «14/33 «14/37 «19/34 = 19/47 2a/4a2 3/48 
TBOCO 041071 25/09 = 28/028 39/54 339/57) 44/18 4S/11 0 e/0L = 8/27) 52/49 
TBELL 041401 32/07 «= 33/248 $2/53 53/12 8953/21 = 553/260) 53/27)=— 83/28) = 53/32 
T8FL 000200 12/234 25/16 28/04 28/07 53/37 «953/52 93/55) 54/594 
TBRPT 041176 30/04 30/21 
TEMP1 000103 Q/37H 17/03 17/4% 29723 29/37) 30717 = 30720 
$2/35 32/54 é : 
TEMP2 000104 9/394 22/21 22/26 22/37 
TEMP3 000070 9/418 15/03 15/47 
TEMP4 000105 9/448 -29/15 29/30 
TEMPS 000106 9/458 16/56 17/23 
TESP1 041662 SB/17 = 38/488 638/52 
TESP2 041657 38/15 38/21 «38/23 38/44H §=640/57 
TESTS 042644 20/07 53/168 
TICK 042350 47/104 48/36 
TOCLR 041721 58/23 939/308 41/37 
TOINT 041024 24/60 26/448 
TOKEY 041310 30/03 = 31/ob# 
TPMF 041030 25/28 26/484 
TPMFA 040736 25/294 26/50 
TRUUT 042044 Gi/19# 41728 
TRTOC 041654 35/14 38/394 
TRUMP 042051 41/248 
TSCAN 042001 36/30 38/32 38/35 40/37# 
vPOS 000074 9/208 15/48 16/16 16/19 16729 40/745 47724 
49/14 
VRCHK 042352 GT/13 47/318 
VRCMD 041676 38/30 39/088 
VRINT 042360 47/28 48/38 
VRSTJ 042323 17/18 «47/018 
VRSTP 000075 © 9/22H 15/49 15/56 16/34 16/39 4u/50 49/12 


49/27 49/57 


PROPRIETARY INFORMATIUN UF DATA GENERAL CORPORATION, 
CUPYRIGHT OGC, 1979 
0065 LP2u1 


THIS IS A RUM MAP FOR THE PRUGRAM USED BY THE MICRONOVA 
IN THE DASHER LP2 AND TP2 PRINTERS. EACH PROM CONTAINS ONE HALF 
AN INSTRUCTION WORD (ONE BYTE) AND S12 LOCATIONS. 


40000 
40001 
40002 
40003 
40004 
40005 
40006 
40007 
40010 
40081 
40012 
40013 
40014 
40015 
40016 
40017 
40020 
40021 
40022 
40023 
40024 
40025 
40026 
40027 
40030 
40031 
40032 
40033 
40034 
40035 
40036 
40037 
40040 
40041 
40042 
40043 
40044 
40045 
40046 
40047 
40050 
40051 
40052 
40053 
40054 
40055 
40056 
40057 
40060 
40061 
40062 
40063 
40064 
40065 
40066 
40067 
40070 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION 


COPYRIGHT DGC, 1979 
0066 LP2u1 
THE FIRST 512 LUCATIUNS ARE CONTAINED IN THE PROMS WITH OG NO.- 


000 
001 
oo2 
003 
004 
005 
006 
007 
008 
009 
010 
oll 
vie 
013 
014 
015 
016 
O17 
018 
019 
020 
021 
022 
023 
024 
oes 
026 
027 
028 
029 
030 
031 
032 
035 
034 
035 
036 
037 
038 
039 
040 
oat 
o4e 
043 
044 
04s 
046 
047 
048 
049 
050 
os1 
052 
053 
054 
oss 
os6 


100-2130 
0100u001 
00110001 
10101100 
Qv1L1001 
00100020 
01000011 
10120110 
1O11L1ite 
00000001 
00110000 
01001100 
11110100 
00000001 
00100001 
01100010 
00100000 
00111000 
10011110 
01000011 
00100100 
00100000 
00111000 
10011110 
0000011 
01000100 
OO1L1001 
V1108002 
14111011 
01010011 
10101011 
00000001 
00001101 
GOOOdi100 
00000001 
01000110 
01011000 
00101106 
10101010 
00000001 
00001100 
02000000 
00001001 
00101100 
10101010 
00000001 
00001100 
v0001100 
00001001 
00100100 
10000010 
00000001 
01100000 
00111000 
00101000 
11111016 
00101000 
01001000 


100-2127 
ouoUuodd! 
00100001 
o000u000U 
01010011 
iS SRSESS! 
voougoou 
vo00vud0”d 
00000100 
11111100 
00011100 
00010100 
Qo0000100 
11112110 
GL110111 
00000001 
00011001 
vo1vuliL 
00000000 
000u0000 
00001010 
00101010 
00100010 
00000000 
00000000 
OO1000E1 
00111101 
01010000 
v0v0v0000 
oovuu0dd 
Oouvu1OO 
11121101 
01101001 
0v000100 
Vird1412 
00000000 
00111000 
00001001 
01001010 
00001000 
00101181 
00100011 
00011001 
00001001 
01001011 
vool1otil 
00101101 
00101110 
Ov010011 
00001001 
01000010 
0001000! 
10411211 
01001811 
OOO114I2 
10001011 
00011100 
01000010 


Cc 


PROPRIETARY INFURMATION OF DATA GENERAL CORPORATION PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION 


COPYRIGHT OGC, 1979 COPYRIGHT DGC, 1979 
0067 LP201 0068 LP20) 

40071 057 01001000 yiouudl 40162 114 00L1000U 00111101 
40072 058 00001002 Gouu1000 40263 115 11100101 Gouuuoro 
40073 059 01010000 01010111 40164 116 00000001 11100110 
— 40078 060 00111001 11101100 40165 117 10101010 10000011 
40.075 061 01011000 00000100 ‘ 40166 118 00000001 1110000) 
40076 Ube 00010000 01001011 40167 119 00100000 Yu111101 
40077 063 00000001 01111001 40170 120 00111000 vi2000R1 
40100 064 10100001 00000000 40171 L121 11111010 voodu100 
40101 O65 00000001 01111000 40172 1l22 001000U0 00000110 
40102 066 0101100u 00000100 40173 123 11111101 90000000 
40103 067 00121000 v0011110 40174 124 01011000 OL100011 
40104 066 OL1NVOOOU LOLL1EIE 3 40175 125 00001101 vou1U110 
40105 069 00100000 v1011100 40176 126 00101000 O1u0ov0ds 
40106 070 11100111 GooUv0dO 40177 127 00010000 O1112111 
40107 O71 01000000 01011100 40200 128 00000001 00111000 
40110 072 01100000 UL111111 40201 129 00011000 00110010 
40114 073 00000100 00111000 40202 130 00000001 vucuLNnL 
40112 074 00101000 00111100 40203 131 00001101 OdUUI0N1 
40113 075 00110000 00111101 40204 132 OVOOQVOVD 10010101 
40114 076 01110110 01000001 40205 133 0000000u uv0010001 
40115 077 00001101 00111100 . 40206 134 01000000 01000110 
40116 078 00000000 10000010 : 40207 135 00001101 0000101 
40117 079 O0000000 VOOUUII’ 40210 136 01000101 O0U11U10 
40120 060 10101010 YvO00U101 . 40214 137 01000010 01011000 
40121 081 00000001 40101101 40212 138 01000000 O100Uv011 
40122 062 00110000 VOL1IL0L 40213 139 OOVOL101 0000001 
40123 063 01110110 11000001 40214 140 91000010 YU011011 
40124 064 10100010 00000000 40215 141 00000000 01000001 
40125 085 00000001 Ou1l01000 ees 40216 142 00101000 OovuuIIL 
40126 066 00000000 00110110 7 40217 143 10001101 00101010 
40127 087 001114000 00010100 5 40220 144 10100010 00000000 
40130 068 11111010 yoouu1OL 40221 145 01000000 01000010 
40131 089 90000001 00100101 40222 146 00001101 11111010 
40132 090 11000110 OU000000 40223 147 01000100 11010011 
40133 092 00000001 00100010- 40224 148 01000010 00001100 
40134 v92 00110001 01101101 . a 40225 149 10001000 00000000 
40135 093 01010000 01102000 : 90226 150 01001000 01001000 
40136 094 10011010 OOYoOu100 40227 151 00111000 01110001 
901357 095 00000001 01110010 , 40230 152 00110000 01000110 
40140 096 11010100 go00u000 1 40231 155 00101000 O00U0111 
40141 097 01010000 00110011 40252 154 11001101 00100011 
40142 096 00110000 00010100 : 40233 155 00000001 GOovU001) 
40143 099 00111000 00111100 , 40234 156 10110110 Ov0vG000 
40144 100 11011301 00100011 40235 157 10101101 00000000 
40145 108 01011000 00111100 40236 158 11111010 01001010 
40146 102 00100000 00011110 40237 159 10000010 01010000 
40147 103 10100101 00000101 40240 160 10001101 00101010 
40150 104 00000001 11100010 40241 161 10100010 00000000 
40151 105 10101010 10000010 40242 162 11112010 01001010 
40152 106 00000001 00010100 40243 163 10000010 10010000 
40153 107 00100000 ovuivl100 40244 164 00101000 vi10u100 
40154 108 10000010 00000101 . 40245 165 10101010 10010011 
40155 109 00000001 00001000 40246 166 00101000 01000011 
#40156 110 00111000 00111100 40247 167 10101010 10011101 
40457 111 00110000 01110011 40250 168 01000000 01000111 
40160 112 11110110 00000000 40251 169 10111001 00100101 


40161 113 10010101 Gu100000 40252 170 00111000 OO110010 ac 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION PROPRIETARY INFORMATION OF DATA GENERAL CORPURATION 
COPYRIGHT UGC, 1979 COPYRIGHT UGC, 1979 
0069 LP2u1 0u70 LP201 
40253 171 11101010 01000000 40344 228 0101000U 100v0U001 
40254 172 10000010 v1000101 40345 229 00100100 vOovl10N 
40255 173 00000001 OOOv1101 40346 230 00110000 00110101 
40256 174 00101000 O100u0001 40347 231 11000111 Gouvui00 
40257 175 11001101 OOOLULIO : 40350 232 00000011 vu0u000N 
40260 176 11111010 01000010 40351 233 00100001 00011110 
40261 177 00000003 O00uN0111 40352 234 00110000 10000001 
40262 178 O0LC0000 01000010 40353 235 11010010 O00vu101 
40263 179 11000101 00000000 40354 236 00100001 10011001 
40264 180 10001100 00101010 40355 237 00110000 vo1Lvu0d! 
40265 161 10000011 vovduvo”U 40356 238 10010110 v0000000 
40266 182 10100101 vo1duoud 40357 239 01000010 00000000 
40267 183 100011201 YO0ULI0L1 40360 240 00000011 vuvu000N 
40270 184 10100001 00000001 40361 241 00111000 01110000 
40271 165 11181100 O0000001 40362 242 11111010 voouulol 
, 40272 186 11121101 01010000 40363 2435 00111002 02101110 
40273 167 01031000 01001011 40564 244 1111101) OUOOULL 
40274 188 10108101 Oovvouod 40365 245 01011000 01101111 
40275 189 01001000 01111000 40366 246 01011000 01110000 
40276 190 01001000 01100101 40367 247 00110000 OV1L0010 
40277 191 00101001 10111110 40370 248 10010110 00000000 
40300 192 01001000 Yilivlul : 40371 249 021000010 vOv00000 
40301 193 10001010 01000010 40372 250 00110001 10010011 
40302 194 10000001 oou0Uu00 . 40373 251 10010101 Gouv0100 
40303 195 10101100 100000V0 40574 252 O00UU00NU1 00111100 
40304 196 10111101 00001101 40375 253 10000101 0v000000 
40305 197 11100110 OVvOUGOVO 40376 254 00001100 00101101 
40306 198 01000000 01000010 40377 255 00001001 11100011 
40307 199 10010010 00000101 40400 256 001000012 10001101 
40310 200 00000001 o1110000 40401 257 00000001 11110110 
40311 201 00000101 11001011 : 40402 258 00100001 O00u0010 
40312 202 00101000 01011000 40403 259 00000001 11110100 
40313 203 00110000 doovuI0L 40404 260 00000000 00111100 
40514 204 11001111 Ouovv100 40605 261 00000000 00101111 
40315 205 10101100 Ouguvond. 40406 262 00000000 01111100 
40316 206 00111000 00011011 40407 263 00000000 Y0010011 
40317 207 10011101 00100011 : 40410 264 OULVO0OOU 00111110 
40320 208 00001100 00101111 : 40411 265 01000010 10011001 
40321 209 10010010 vouuvl0”d 40412 266 01000101 16100100 
40322 210 00110000 oovdui01 : 40413 267 04000101 10011000 
40323 211 01010000 01011001 40414 266 0100000U 11100000 
40324 212 00000001 OL1100100 40415 269 00000000 vO100110 
40325 213 01000000 01011100 Z 40416 270 01000010 00011101 
40326 214 01001000 01111111 40417 271 VOLL100U0 Ui0vI10”N 
40327 215 10110100 Oo1u0011 40420 272 11100010 OvV0UU100 
40330 216 00000001 01001011 40421 273 00000001 00100111 
40331 217 11111010 10001011 40422 274 00111100 vov0I100 
40332 218 10101011 01010001 80423 275 11111110 11010000 
403335 219 11111010 01001011 40424 276 00101000 v1110102 
40334 220 00000101 11111001 40425 277 10101010 00000110 
40335 221 00000001 O1000111 40426 278 00011000 O1110101 
40336 222 01010000 v1010000 . 40427 279 00000001 00001000 
40337 223 00000001 00000100 40430 2860 00100000 00011011 
40340 224 00100000 0v011000 40851 261 00101000 01000001 
40341 225 01000000 01111110 * 40832 282 00110001 11101100 
40342 226 11010100 00000001 40433 283 10110101 00100010 


40343 227 00110000 00011001 40434 284 10000000 Ovv00000 


PROPRIETARY INFORMATION OF DATA GENERAL CURPORATION PROPRIETARY INFORMATION UF DATA GENERAL CORPORATION 

COPYRIGHT UGC, 1979 COPYRIGHT DGC, 1979 

0071 LP201 0072 LPevl 
40435 265 010000N0 01100101 40526 342 0011000u 01000100 
40436 286 00000001 10%0U01! 40527 343 001211000 01110000 
40437 287 00101000 Gu111011 40530 344 11111010 vuovvioU 
40440 268 00110000 01101000 40531 345 00100001 10101100 
40441 289 10101010 OO0GULOL . 40532 346 00111000 dO10uu10 
90442 290 00000001 10110100 40533 347 10011110 OVOLLOON 
40443 291 01010000 01101000 40534 348 01000011 voULvULUD 
40444 292 0011000uU 01011000 3 40535 349 10111010 11000000 
40445 293 11010010 vOnuvUL0L 40536 350 1211101u 01001011 
40446 294 00000001 yvouluotrO 40557 351 00000001 vOuvuIII 
40447 295 00001100 00101101 40540 352 00111000 YL101211 ’ 
40450 296 01101010 vulliiit s SO0S4i 353 1121201u OOULU1IOL 
40451 .297 00100000 01000111 : 80562 354 111112011 GouLvvo0d 
40452 298 410000010 0000U101 40543 355 11111011 vdoUv10L 
40453 299 00101000 O0U1L001 40544 356 00000001 10001101 
40454 300 00000001 vOU0L1I11 40545 357 01011000 OL101411 
40455 30r 00100000 10000001 405866 3568 11001111 O1000011 
40456 302 10000010 00001101 40547 359 00000001 YouutII! 
40457 305.00001001 10110100 40550 360 00111000 vO101011 
40460 304 00100001 °11011101 40551 361 00100000 10uLv0U0L 
4046 305 00000001 OVULUIOL 40552 362 10011111 vOuul100 
40462 306 10000101 0000U000 40553 363 00000001 00001000 
40463 307 01000000 10000001 . 40554 364 00100000 GU01IU010 
40464 308 01000000 01010000 40555 365 1110010 O0U100LL 
40465 309 00001001 10110000 ‘ 40556 366 00001101 10011110 
40466 310 00000001 00000010 40557 367 00001101 10011010 
40467 311 01000000 v1101010 40560 368 00000001 vuuvui10 
40470 342 11111101 oO0vU00N 40561 369 03000101 YUUL1000 
40472 315 00101000 01110100 40562 370 U100000U 11001010 
40472 314 LILOLLUU OULVU0IL 40563 371 00100100 vuoulivd 
40473 315 01001000 vi110100 40564 572 10000010 10u0Uu011 
40474 316 00011000 00110001 : 40565 375 00000001 11111010 
40475 $17 00001101 11003110 $0566 374 11001111 UlovueIL 
40476 318 00010000 0110001 40567 375 00000001 00011010 
40477 319 00110000 00111001. 40570 376 10201110 01010011 
40500 320 11010010 10010100 . 40571 377 00000001 10001001 
40501 321 0v011000 00111001 40572 378 01001000 00110110 
40502 322 VOLO11VU Uu0UL100 40573 379 UVO1L00000 OULI1O0L 
40503 323 00100001 11000101 : 40574 380 00111100 vuOvIOIE 
90504 324 10101240 01000011 : 40575 S41 11111010 vidvv0LO 
40505 S25 00000001 11101000 40576 382 00111000 10000001 
40506 326 110210100 10000000 40577 383 10011101 vuv01101 
40507 327 01010000 viLodu100 40600 384 00000001 10110010 
40510 326 OO111000 O12ib111 f 40601 385 GO100000 O1111101 
40511 329 00110000 00011001 $0602 366 10000010 01001010 
40512 330 12011101 00001100 : 40603 387 00001101 19000111 
40513 331 00110000 01000100 40604 388 00111000 00110011 
40514 332 00111000 00110011 40605 389 11111011 00001101 
40515 333 11111011 yvoouuros 40606 390 00001101 10001000 
40516 334 01010000 O1111111 40607 391 00000001 00001010 
40517 335 00121000 01111101 40610 392 00101000 00110110 
40520 336 11111010 01001010 40611 393 10101010 O1000011 
40521 337 00100001 10121100 © 40612 394 00000001 00000100 
40522 338 00111000 00000110 40613 395 01000000 O0110011 
40523 339 00110000 10000001 40614 396 00111000 00011001 
40524 340 11010010 00001100 40615 397 01011000 O1102111 
40525 341 11100100 od0du000 40616 398 00111000 OO10U001 


PROPRIETARY 1NFURMATLUN OF DATA GENERAL CORPORATION PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION 

COPYRIGHT OGC, 1979 COPYRIGHT DGC, 1979 

0073 LP20) 0074 LP2o1 
40617 399 10011110 vuvuvonY 40710 456 00100000 00110011 
40620 400 01000011 vouuuu00 40711 457 00111000 00011010 
40621 401 00101000 01210110 40712 4SB8 10011101 00100000 
40622 4v2 00100000 01000010 40713 459 00101000 01001011 
406235 405 10101010 VO00U10L : 40714 460 11111001 00000110 
40624 404 10000010 voovutuL 40715 461 00000001 01101100 
40625 405 00000001 vouvuVI0 40716 462 11010010 onn00i10! 
40626 406 0V000LU1 11011100 GO717 463 00110000 00111011 
40627 407 00101000 01011001 40720 464 11010010 00000100 
40630 408 10101010 vuudV100 40721 465 00000100 00510000 3 
406031 409 00000001 10021111 : 40772 4he 01010000 10000000 
40632 410 00100000 OUL1UOLI 40723 467 01010000 01101000 
40633 411 10000011 OuOULIO”U 20724 468 00100000 01011000 
40634 412 00UV00001 v01 00000 40725 469 00101000 00110011 
40635 413 11010011 O101U101 407726 470 00111000 onn11110 
40636 414 00001101 11010011 40727 471 10111101 10101100 
40637 415 VOLIVOUN 01000111 40730 472 00111000 onns1111 
40640 416 11000110 vuLUonrL 40731 473 10111101 10100101 
40641 417 01000000 O10UUI11 40732 474 00000101 01101111 
40642 418 HU101000 vluu1011 40733 475 00110000 01100100 
40643 419 10101011 OGUU1101 ; 40734 476 11010010 onn00100 
40644 420 00000001 vuuuuiit ; 40735 477 00000001 00111011 
40645 421 00001001 01110110 . 40736 478 11010011 oonoo1o1 
40646 422 YO0OL0UL 01110111 : 40737 479 00000100 00110000 
40647 423 00000101 viluiio” 40740 480 11010100 0000000 
40650 424 00000001 -0u001010 7 40741 GBt 01010000 ont10011 
40651 425 01000000 10111100 40742 482 11111000 00110101 
40652 426 01000001 00110111 40743 483 00000101 00101110 
40655 427 11000003 GuL0ULOL * 40744 484 01001000 1001010 
40654 428 OVLO00UU Y1001000 40745 48S 00101000 01001011 
40655 429 00110000 0v101000 . 40746 486 00111000 n1n00001 
40656 430 00101010 ovovuu10 40747 487 10110000 01100010 
40657 431 10001101 vOOVOULL : 40750 488 00110000 00000111 
40660 432 01001010 voouvold , 40751 489 11011101 oon00111 
40661 453 00001001 O111U100- 40752 490 00000101 01100000 
40662 434 VOL10100 v0vU1100 40753 491 00110000 01100110 
490663 435 11010110 O10u101) 40754 492 01010000 01100111 
40664 456 00000001 O00U00111 40755 493 00110000 O1n11111 
40665 437 00110000 01101010 : 40756 494 01010000 o1ni11110 
40666 438 11010010 ovovvi100 40757 495 00110000 o+110001 
40667 439 00000101 01011011 40760 496 00111000 01001111 
40670 S40 00110000 Guru100l 40761 497 11111010 O1N00000 
40671 442 10010401 QUUU1101 , 90762 498 11010010 01000000 
40672 442 00000101 11110000 90763 499 11111010 10000000 
40675 443 010000U0 00110011 40764 500 01011000 o1o01iit 
40674 444 00110000 01010000 40765 501 11010010 01000000 
40675 445 11010010 duovuiod 20766 S02 00110000 o0n11011 
40676 446 00000101 01010101 40767 503 10101010 o1001011 
40677 447 OO10000U 01100101 40770 S04 11010101 01110000 
40700 448 10000001 oovvu100 40771 505 01010000 n1001101 
40701 449 00000101 11191000 40772 S06 00110000 00011100 
40702 450 00101000 v1u10iI1 . 40773 S07 11000111 00100100 
40703 451 10101010 o00V0100 40778 508 11000010 10010000 
40704 452 00000001 01010000 40775 509 11111010 01000010 
4070S 453 001100V0 01001100 40776 510 00110000 00011111 
40706 458 11010010 10011100 40777 511 01010000 01001100 


40707 455 00000001 Goo0UL11 


PROPRIETARY TNFORMATION OF DATA GENERAL CORPORATION PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION 


COPYRIGHT NGC. 1979 COPYRIGHT DGC. 1979 
0075 LP201 0076 LP201 
THE NEXT 512 LOCATIONS ARE CONTAINED IN THE PROMS WITH NQ.= : 
41072 058 11010100 non00000 
100-2131 190-2128 41073 059 00100000 10000000 
41000 000 00010000 O14111111 41074 060 10000011 OOn00101 
41001 GOL 00000001 01001010 41075 O61 11018110 00000000 
41002 No2@ OOL10000 O1000111 : 41076 062 01010000 10000000 
41003 003 00111000 01001000 41077 063 01010000 00110011 
41004 004 11011110 00000000 41100 064 00110000 01000010 
41005 005 10000010 00000100 41101 065 11011110 00000000 
41006 006 10011110 00101011 41102 066 00100000 o1011000 
41007 007 10000100 00010001 41103 067 11010101 91010000 
41010 908 10000011 00010000 41104 068 11111011 00100000 . 
41041 009 01000000 01001110 - 41105 069 01011000 01000010 
41012 010 10010100 00001110 41106 070 01011000 01110110 
41013 O11 00000100 00110000 41107 O71 01100000 O111%181 
41014 O12 00111000 00011011 41110 072 00000001 11000010 
4t015 013 11110100 00101010 41411 073 01000000 01011110 
81016 014 00001100 00101111 Giii2 074 01000000 11010001 
S1017 015 00001100 00101110 81113 075 10000010 n0n00100 
41020 016 00000100 00110000 41114 076 00000001 10111100 
41021 017 01000011 11010100 81115 077 11010101 00000000 
41022 038 01000011 01101110 41116 075 00100000 01001010 
41023 019 01000001 O0001111 3 41117 079 00111000 00101010 
41024 020 £0101011 00000000 81170 080 10011100 00100010 
41025 021 11010101 00000000 : 41121 081 00000001 10110110 
41026 O22 00001100 00000100 41172 082 01010000 01001100 
81027 023 00000100 00110000 61123 083 00101001 00101100 
41030 024 01010000 01100011 91124 084 00111000 ooni101t 
41031 025 00110000 00110010 4112S 085 10011101 onn0010! 
41032 026 00000001 11000100 41126 086 01001000 00110001 
41033 027 00110000 00101000 41127 087 00000100 00110000 
41034 028 14111011 00000001 3 41130 088 01011000 00110110 
4$035 029 00110001 01110110 41131 089 10000101 00000000 
41036 030 00100010 00000000 41132 090 00110000 00101000 
41037 O31 00101010 00000010 41133 091 01110110 01000001 
41040 032 10001100 00001101" 41134 092 10010100 00000000 
41001 033 00000011 G0000000 ~ 41135 093 01010000 01000101 
41042 O34 10101011 00000000 91136 094 00110011 00000001 
41043 035 01001010 00000010 F 41137 095 00114011 90000000 
41044 036 11111011 00000000 41140 096 10111110 90000000 
41045 037 00100030 00000001 : 41444 097 10110101 00000000 
41046 038 10001110 00000000 41142 098 01010000 01000011 
41047 039 00100010 00000000 41143 099 10010000 00000000 
41050 040 10001100 00101011 e 41144 100 0010111 00000000 
41051 0401 10001100 00000000 41185 101 10101010 10010000 
41052 O42 00110010 0n000011 81146 102 11010011 00000100 
41053 043 10110110 00000000 41187 103 00000001 11111110 
41054 044 11010010 10000000 41150 104 00190000 01000101 
41055 045 00100010 29000000 41151 105 101010910 10010101 
41056 046 10000010 00001011 41152 106 00000001 00000100 
41057 047 10000010 11000000 41153 107 10900101 00000000 
41060 048 00110000 00011001 41154 108 00000001 00001001 
G1061 049 11000111 00000000 - a1isS5 £09 11010011 00000000 
41062 050 00101000 100900001 41156 110 00011000 01000011 
41063 O51 10101010 01001011 41157 141 11111011 00000001 
41064 052 00000011 00000000 41160 112 00000001 00001010 
41065 053 00011000 01111110 41161 113 00101011: 00000000 
41066 054 00000011 00000000 41162 114 10101010 on000101 


61067 055 01010000 10000001 
41070 056 00000011 00000000 
S1071 O57 O1100000 10181111 


c a . 


PROPRIETARY INFORMATION OF NATA GENERAL CORPORATION PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION 

COPYRIGHT OGC. 1979 COPYRIGHT DGC. 1979 

0077 LP2ot 0078 LP2ot 
41163 115 00000001 11111010 41254 172 00110000 00101001 
41164 116 00000001 0000010 41255 173 10010101 onnoti01 
41165 117 10000011 00000000 41256 174 00000001 01100000 
41166 118 10101010 10010011 41257 175 00110000 01400010 

- 81167 119 00000001 11111110 41260 176 11010010 00000100 

41170 120 00101000 00101000 81261 177 00000001 on101111 
41471 121 01110110 11000001 41262 178 00101000 ooo10101 
41172 122 00111000 on110110 41263 179 10001101 10100101 
81173 123 00000011 non00010 ; 41264 180 00000001 n1050111 
41174 124 10110010 o1900010 41265 181 00101000 00011100 
41175 125 00000001 01001011 91266 182 00110000 00011110 4 
41176 126 00111000 01010100 . 41267 183 10010101 10101100 
41177 127 00010000 01010110 41270 184 00110000 oo011t11 
41200 128 00100000 00011010 41271 $85 10001101 nnoooto! 
41201 129 10001100 00011111 41272 186 11000010 00n00000 
41202 130 00000001 01011011 41273 187 10010101 10101101 
41203 13 00100000 00110100 41274 188 00000001 0100110 
41204 132 10011110 00000000 41275 189 10101000 00001100 
41205 133 01011000 01910100 41276 190 00000001 00001000 
41206 134 10001101 00000000 41277 191 00101000 01010100 
41207 135 01001000 01000011 41300 192 00001001 10031000 
41210 136 00100000 00101010 41301 193 00000000 10001001 
41211 137 00001101 n0000011 i 41302 194 00000000 non01010 
41212 138 00101000 01000011 41303 195 10101010 oon00101 
41213 139 00000001 11110013 ; 41304 196 00000100 00101100 
41214 440 01000011 00010100 41305 197 00100000 00101010 
41215 141 00100100 oonottot 41306 198 00110000 01011101 
41216 142 00111000 00011010 41307 199 11010010 0000100 
41217 143 11100111 00000000 41310 200 00000001 00111115 
41220 144 00111000 0110110 41311 201 00110000 0011010 
41221 145 01011000 00110111 41312 202 10010101 oOn0:101 
41222 146 00001101 00000101 ; 41313 203 00000100 00101100 
41223 147 00000000 n0010101 41314 204 00110000 ons01010 
41224 148 00111000 00110111 41315 205 10010100 oo10i0lt 
41225 149 01011000 00110110. 41316 206 00000001 on1i0011 
41226 150 00000100 oo101100 41317 207 10010501 00001t00 
41227 151 01000011 oonto0010 41320 208 00000001 00110110 
41230 152 01000011 01101101 41321 209 00111000 00110010 
41231 153 01100101 a0n00001 : 41322 210 00110000 o1nioo1t 
41232 154 00100100 aonoto10 : 41323 211 L1111011 00001100 
41233 155 10001010 00000000 41324 212 10010101 00001101 
41234 156 11010101 00000000 41325 213 00000001 10100111 
44235 157 01010000 1101111 41326 214 10101010 01001010 
41236 158 00110000 oon11001 sy 81327 215 00101000 00110100 
41237 159 11011011 oon00000 41330 216 00100000 01010100 
41240 160 £00t1111 Ooo0010! 41331 217 10100110 ann00000 
41241 t4t 00100000 o0011001 41332 218 01000000 o1010100 
41242 162 11000111 00000000 41333 219 00001001 91000100 
41243 163 00111000 01011010 41334 220 00000001 00110101 
41284 164 11111010 00001100 91335 221 10100110 00000000 
41285 165 00001011 00000000 41336 222 10111110 0000000 
41246 166 11011010 10010000 | 41337 223 01011000 o1010100 
41247 167 00110000 01101001 41340 224 00001001 00410100 
41250 168 11010010 10011100 41341 225 00000001 00310000 
41251 169 00000101 11101111 41342 226 01001000 01000011 
41252 170 11100111 00000000 41343 227 00001001 00110001 


41253 171 101111911 0000000 41344 228 00010000 00110010 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION PROPRIETARY TNFORMATION OF DATA GENERAL CORPORATION 

COPYRIGHT NGL. 1979 é COPYRIGHT DGC. 1979 

0079 LP2o! 0080 LP201 
41345 229 00000001 00000010 41036 286 11110110 00n00001 
41346 230 00000001 00000111 41437 287 01011000 00110110 
41347 231 00110000 01101110 41440 288 00111000 00011001 
41350 232 00100000 01010110 41441 289 11010040 10000010 
41351 233 0001001 00110110 : 41442 290 11100111 o0000001 
41352 234 00110000 01101101 41443 291 11100111 11000001 
41353 235 00100000 01010100 : 41444 292 11411000 00000000 
41354 236 00001001 00110031 41445 293 00101010 nnn00000 
41355 237 00100000 01010100 41446 294 11101111 00000000 
41356 238 00101000 n1000011 41487 295 10001110 on000000 
81357 239 00111000 90110100 41450 296 01001010 onnooo0n 
41360 240 1020010 0nn00101 : 41451 297 11010010 01000000 
1361 A244 10000010 00000101 41452 298 00000100 onti0110 
44362 242 10000101 00000001 41453 299 00000000 o1011001 
44363 243 11100101 00000000 41454 300 00000000 01000101 
41364 244 01000000 01010100 F 41455 31 01011000 00110110 
41365 248 00001001 non11111 41456 302 00111000 ot010100 
41366 246 01010000 03010011 41457 303 14111010 09000100 
41367 247 10000101 60000000 41460 304 00000101 0111100 
41370 248 01000000 o1101011 41461 305 00111000 noso1010 
4i371 249 01000000 01010110 41462 306 01011000 01010011 
44372 250 00001001 00011010 : 43463 307 00000100 00110110 
41373 251 01010000 O1101100 41464 308 10000101 00000000 
41374 252 00001001 00011000 41865 309 00010000 n1o001ot 
41375 253 01010000 044101101 ‘ 41466 310 00000001 01110110 
41376 254 00001001 00010110 41467 341 01000000 01101001 
41377 255 01010000 01101110 41470 312 00000101 00110100 
41400 256 00000001 00010001 41471 313 01000000 01101001 
41401 257 00110001 00000111 41872 314 00001001 11110011 
41402 258 00111000 00011011 41473 315 01000000 o110s0ot 
44403 259 10011101 ann00101 41474 316 01001000 01000101 
41404 260 01010000 00110001 ' 41475 317 00100000 00101001 
41405 261 00000100 00101100 ; 41476 318 00001001 11010110 
41406 262 01010000 01010011 41877 319 00101000 01000101 
41407 263 00111000 01010100. 41500 320 00100000 o11ns011 
41410 264 00010000 01010110 41501 321 10001111 Cono110! 
41411 265 00101000 00110100 41502 372 10100110 00000000 
41812 266 00000001 11910100 41503 323 01000000 01101041 
41413 267 10101011 01010000 ‘ 41504 324 00111000 00110010 
41414 268 01000000 01100000 : 41505 325 00110000 01101100 
41415 269 00000001 o0110011 41506 326 #1111011 n0n00100 
41416 270 00101100 00001011 : 41507 327 00001001 11011000 
41417 271 10101110 01000010 4 41510 328 00100000 01100000 
G1ig20 272 01000000 o1t01001 QiS11 329 00000001 10010111 
41421 273 00000100 00101100 41512 330 10101011 On000100 
41da2 274 00110011 00000000 41513 331 00000001 onn01110 
41423 P75 11111011 00060001 41514 332 11001011 00100000 
41624 276 00110000 00101000 41515 333 10101011 o0n01110 
414aS 277 01011000 00110110 41516 334 10001010 n0000101 
41426 278 00011010 00000010 41517 335 01001000 01101001 
41427 279 00000001 oQn00001 41520 336 00110000 01100000 
41430 280 00101010 O0000001 | 41521 337 00111001 11011010 
41431 281 00111030 00000000 41522 338 11110100 000015100 
41432 282 10111101 00000100 41523 339 00111001 11011001 
41433 283 10111011 0n00000 : 41524 340 11110100 00000101 
41434 284 01011010 0000001 4t525 341 00001001 113011000 
41435 285 00110010 00000011 41526 342 11010011 on001100 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION PROPRIETARY TNFORMATION OF DATA GENERAL CORPORATION 


COPYRIGHT OGC. 1979 COPYRIGHT DGC. 1979 

0081 LP2ot 0082 LP20i 
41527 343 00000001 10001001 41620 400 01000011 10100001 
43530 304 00000001 01110111 41621 401 00110001 00110101 
41531 345 11010000 10010100 41622 402 00111100 00411110 
41532 346 0000000! 01101011 : 81623 403 01000101 01001110 
41533 347 00110000 01110010 41624 404 01011001 01100001 
41534 348 01000000 01110010 41625 GOS 01100100 01100011 
41535 349 00010000 01101010 41626 406 00000000 04001111 
41536 350 90000100 00110000 41627 4O7 00101011 00101081 
41537 351 11010010 11000000 7 41630 408 00001101 oOnn01101 
41540 352 10010110 00000000 41631 8409 00001011 00001010 
41S4f 353 00111000 01100001 7 41632 410 00001110 00001110 
41$42 354 00100001 00110100 G1633 811 00001100 00010000 
41543 355 11100100 00000101 41634 412 01101011 01101010 
41544 356 00000001 01000111 41635 413 00001001 01101100 
41545 357 00111000 01911000 41636 414 00000111 00000111 
41546 358 11111010 00000100 41637 415 00001010 00001010 
41547 359.00000001 11111110 416480 416 00100111 OnN001O1 
41550 360 00111000 00111011 41641 417 01100001 01100001 
41551 361 £1111010 00000100 41642 GiB 01100401 01100101 
41552 3H2 00000001 11111110 41643 419 01011001 01011001 
41553 %63 00000010 oan00000 41644 420 01000100 H1000100 
41554 364 01000011 0010001 : : 91645 421 0004100! 01011100 
41555 365 10101190 00010001 , 41646 422 00000101 01011000 
41556 366 10101101 00100000 . . 41647 423 01010111 01011010 
41557 367 11010010 01001010 41650 42g 01010111 010150111 
41560 368 00000001 11011010 41651 4a5 01001011 01001011 
41561 369 01001000 01000101 41652 426 01010111 01001100 
41562 370 10101011 0001010! 41653 427 01010000 o1nititt 
41563 371 01000000 01100000 41658 428 00000001 01010100 
41564 372 11111100 00000011 41655 429 10101010 01010000 
41565 373 01000000 01100001 4 41656 430 01001000 0110100 
41566 374 11121011 10010000 41657 431 00000001 10001100 
41567 375 00110001 00011001 y 41660 432 10000100 01010001 
41570 376 11110110 00000011 41661 433 10000101 10916000 
41574 377 00101010 11110000: 41662 434 00000001 10000111 
41572 378 10101010 11000000 41663 435 01010000 01100010 
41573 379 11111010 01000000 41664 436 00000001 1114181110 
41574 380 00110000 00011010 ; 41665 437 10101101 109010000 
41575 381 11000111 o0000000 ; . 41666 438 01001000 01101001 
41576 382 10110111 00000101 41667 439 00111001 00011011 
41577 383 00000001 10110101 ‘ : 41670 4a0 00101000 00011101 
41600 384 11000101 10101100 41671 441 10001100 n0n00101 
41601 385 00000001 11110101 . 41672 442 00000101 10110010 
91602 386 00101001 00001110 41673 443 01000011 00000000 
41603 387 10111110 00000000 41674 484 11141081 00N00000 
41604 388 00101011 11110110 41675 445 00000001 11111100 
41605 389 00010000 91000101 41676 446 00111001 00001101 
41606 390 00101011 N0000000 41677 447 00110000 00011011 
41607 391 10010101 Noa00100 41700 448 01900011 nOn00000 
41610 392 10101010 14000000 41701 449 11111011 00000000 
41611 393 11010000 00000000 41702 450 10010100 00100100 
41612 394 00100000 00011001 . ; 41703 451 00000001 1119141101 
41613 395 10100111 00000000 81704 a52 10000101 10010001 
41614 396 10011110 00000000 417.05 453 10001010 00000101 
41615 397 10000101 00000000 41706 454 00000001 00111010 
41616 398 10101101 01010000 41707 455 10101011 00000000 


41617 399 00000011 00000000 : 41710 456 00100000 01010101 


PROPRIETARY INFORMATION OF DATA GENERAL CORPORATION PROPRIETARY TNFORMATION OF DATA GENERAL CORPORATION 
COPYRIGHT hGr. 1979 COPYRIGHT OGC. 1979 . 
0083 LP2oi 0084 LPPOt 


i , THE LAST 5i2 LOCATIONS ARE CONTAINED IN THE PROMS WITH DG NO. 
41711 457 00001101 00001010 


41712 458 00000100 90110000 100-2132 80-2129 
41713 459 90000000 10000010 82000 900 0100000 01101010 
41714 460 01000000 01101001 : 42001 001 00000100 00110000 , 
41715 461 00101000 010910100 . 42002 N02 00101000 01000001 
41716 462 10101011 90000000 ¢ 42003 003 00100000 00n00111 
41717 463 90100000 00000111 42004 004 00001001 001410011 
41720 864 00001001 01300111 42005 005 00000100 00110000 
41721 465 00000101 10011011 42006 0N6 000000 10N01001 
41722 466 00000000 10001001 42007 007 01000000 01101010 Pi 
41723 467 01000100 On110111 “ 42010 008 00101000 onr11100 
41724 468 00101000 01010010 42011 609 00111000 OO111011 
41725 469 10000101 00110000 42012 010 11101110 non00000 
41726 470 10101011 00000100 42013 Of1 01010000 01000101 
41727 471 00000001 00101001 42014 O12 00110000 00111101 
41730 472 00112000 00011011 42015 013 01110110 01000001 
41731 473 01100000 101711111 42016 044 00110000 01000101 
41732 474 00110000 01011100 42017 015 00000001 10141000 
41733 475 11110111 00000010 42020 016 10000100 61010000 
41734 476 11110100 6000000 42021 017 01010000 O1oi1idl 
41735 A77 00111000 00011010 42022 018 00000001 10011101 
41736 476 11011111 00000000 42023 019 91000000 01101001 
41737 479 01011000 01011100 3 42024 020 000010N1 00100000 
41740 480 00110000 00100011 : 42025 021 10000010 11000000 
41741 G81 11110110 00000000 42026 N22 01000000 00111111 
41742 aB2 01000010 00000000 42027 923 00001001 90011103 
41743 483 00111000 00100110 : 42030 024 00111000 00111111 
41744 Bag 10111110 09000000 42038 OFS 11100110 00000000 
41745 &B5 01000011 00000000 42032 026 01000000 OoO1litit 
41746 486 01100000 O19114111 42033 077 00001001 00011001 
41747 487 00000001 ANO11001 *. 42034 028 01000000 ooL11110 
41750 488 00101000 01010001 42035 029 00001001 oOon10111 
41751 489 10101011 00000100 42036 O30 00111000 00111110 
41752 490 00000001 00010110 42037 O31 11111010 11000000 
41753 491 OOf11000 01001111" 42040 032 1001181 00000000 
41754 492 11111010 10000000 42041 O33 01011000 Oni11110 
41755 493 11010010 1900000 : 42042 034 11111101 00000000 
41756 494 11111010 01000000 42043 035 01011000 01000000 
44757 495 01011000 O8001111 Z 42044 036 00001001 09010000 
41760 496 00141000 NO011115 42045 037 00101000 01000000 
41761 497 10101011 01100000 42046 038 10001110 00000000 
41762 498 11010010 19000000 42047 039 01901000 91000000 
41763 499 00000001 11100110 , 42050 040 00110000 on111110 
41764 500 01010000 91100100 42051 O41 00001101 00001101 
41765 501 00000001 on001011 : 42052 042 00010000 00111110 
41766 So2 11010191 0000000 420535 043 00000001 00000001 
41767 503 fi1t11101 01100000 42054 044 00011000 00111111 
81770 504 01011000 00110100 42055 045 00000001 11110111 
41771 505 10101100 90000000 42056 946 00001001 00000110 
41772 506 00000101 90000001 42057 O47 OO111000 00011001 
41773 SO7 01000000 00011001 42060 048 00110000 01000000 
41774 508 01010000 01110001 42061 049 £1000110 00000000 
41775 509 00000001 00000011 42062 050 10014111 00000100 
41776 S10 10000100 01010001 42063 051 00000100 on000011 
41777 S11 01010000 01100110 42064 052 01011060 01011010 


42065 053 00000001 10011100 
42066 054 01000011 00011111 
42067 055 10100101 00101010 
42070 056 00000011 00000000 
42071 057 11010000 00000000 
42072 058 01010000 01110010 


PROPRIETARY TNFORMATION OF DATA GENERAL CORPORATION PROPRIETARY TNFORMATION OF DATA GENERAL CORPORATION 
COPYRIGHT OGC. 1979 COPYRIGHT OFC. 1979 
0085 LP2o} 0086 LP201 
42073 059 10000101 on000000 $2164 116 01101010 OO111111 
42074 060 00110000 00101000 G2165 117 10000101 op000000 
42075 041 01110110 01000001 42166 118 01000000 01101111 
42076 Of2 01011000 00110110 42167 119 00001100 o0101101 
" 92077 063 00111011 00000001 42170 120 00100000 00011110 
42100 064 10111110 00000000 42171 121 00111000 01011100 
42101 065 10101101 oo0n00000 92172 tee 11100111 no000000 
42102 066 11010100 01010004 42173 123 01000000 01911100 
42103 067 11010010 01100000 42174 124 00111000 00100011 
42104 068 10100100 00100011 42175 125 10011110 on000000 
42105 069 00000001 11111110 42176 126 01000011 00000000 
42106 070 00100011 nnno0000 . 42177 127 00000001 00101001 
42107 071 11000111 00000000 42200 128 00100000 01100011 
82110 072 00010000 01110010 42201 129 10011000 on000101 
42111 073 $1000100 00000000 42202 130 00000001 01001110 
92112 074 01000011 o0000000 92203 131 ON111000 O1n010118 
42113 075 00000100 00110110 42204 132 12411011 Of001101 
42114 076 00101000 01011000 42205 133 00111000 ano00110 
42115 077 19101010 n0000101 42206 134 00110000 n0n14111 
42116 078 00000001 01100001 42207 135 00109000 01901100 
42117 079 00110000 onn00101 42210 136 11000191 10101011 
42120 080 11001111 00100101 . 42213 137 00110000 01001001 
42121 081 11111100 O10£0000 G2212 138 110141101 00100010 
42172 082 00100000 91011100 : 42213 139 00010000 01001510 
42123 O83 1001N111 00001100 42214 140 10100100 nooonn10 
42124 084 00000001 01010100 42215 141 00000001 onaiiort 
42125 08S 11000110 oo0n0000 . 42216 142 01000000 01001100 
42126 086 00110000 o1001111 42217 143 00001001 00101001 
42197 087 00101100 on001001 42220 144 10000010 ton00010 
42130 088 £0101010 01000000 42221 145 10100010 01000000 
42131 089 00101000 00011100 . 42222 146 11100010 00000010 
42132 090° 11010010 10001010 42223 147 00001001 n0101100 
42133 091 00101000 00011111 42e24 148 10000000 00000000 
92134 092 00110000 01000001 4e2e5 149 1001t111 N0000000 
42135 093 11110100 o0n00010- 42226 150 10011100 ono000000 
42136 094 11101100 on100001 - Ge2e7 151 11100010 10000000 
42137 095 11111001 00000000 42230 152 10101000 o1n00010 
42140 096 1100110) 00111110 G2231 153 11010010 10000000 
42181 097 10110010 00000000 , 42232 154 00101000 01100131 
4ata2 098 11010010 01001011 92233 155 10101010 00110110 
92143 099 01010000 01000001 : 42236 156 10011010 01100000 
42144 100 110101301 00000000 42235 157 00100000 01001100 
42145 £01 01010000 o1110111 , 42236 158 00110001 ons10001 
42146 162 01010000 01001001 42237 159 11011111 00000000 
42147 103 00101000 01000010 : 42240 1460 00110000 00100100 
42150 104 11001100 00100011 42241 161 1111010 nN0000000 
42151 105 01001000 01000010 G22d2 162 01000010 00000000 
42152 106 10101011 10000100 42243 163 00111000 00011101 
42153 107 00000001 00111101 42240 164 00101000 01005001 
42154 108 01001000 01110110 G2245 165 11101101 00000100 
42155 109 00000001 O0n01110 42246 166 10000010 on000101 
42156 110 00010000 01001001 . 42247 167 00000001 11010001 
92157 111 00101000 01011001 92250 168 11010101 00000000 
92160 112 10101010 o0n00101 42251 169 01100000 10111111 
42161 113 00000001 00001111 92252 170 01100010 10000001 
42162 114 00011000 01011001 92253 171 01100000 00000001 


92163 115 00000001 00110101 42254 172 11010011 00000100 





« 42255 
392256 
‘yaasT 
42260 
42261 
42262 
42263 
42264 
42265, 
42266 


42267, 


42270 
42271 
G2e72 
42273 
42a74 
42275 
42276 
42277 
42300 
42301 
42302 
42303 
42304 
42305 
42306 
42307 
42310 
4a3it 
42312 
42313 
42314 
42315 
42316 
42317 

42320 
4esai 

4asae 
4ase3 
42304 
42305 
82326 
423a7 
42330 
42331 

42332 
42333 
42334 
42335 
42336 
42337 
42340 
4aza. 

4a34e 
4asa3s 
4a34a 
42345 
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2 00 


174 | 
175. 


176 


177 
A178 
179 
180 
181 
182 
183 
184 
185 
186 


187 


188 
189 
190 
191 
192 
193 
194 
195 
196 
197 
198 
199: 
200 
aot 
2n2 
203 
204 
205 
206 
207 
208 
209 
210 
ait 
212 
213 
214 
ais 
216 
217 
218 
219 
220 
2a 
222 


223 


2e4 
2e5 
226 
2a7 
228 
ang 


87 LPeot 


17301100000 


£1100103 
00110000 
11010000 
00100000 
10000010 
a0o000001 
00100000 
10000010 
01010000 
00000001 
00110000 


-11010010 


10000010 
00101000 
00110000 
11001110 
01001000 
01011000 
00101000 
10101110 
10101010 
10116110 
00101000 
10111001 
00101000 
10110110 
91000010 
oo111100 
10101010 
00111010 
00110000 
00101000 
90000100 
00000001 
01011000 
00111000 
00000001 
01100000 
o1100101 
01000000 
01000000 
11111101 
00011000 
00000001 
00000001 
01011000 
00100000 
00101000 


00111000. 


10000010 


-10001100 
21100110 


10100111 
01000000 
00010000 
00000001 


O1miitil 
10000001 


01000001 © 
-0n000000 


01100100 
00000100 
11000101 
01110100 
00n00000 


01010111- 


11000001 


01001112 


01900010 
10001010 


o10010tty 


o1oo1td6l 
00n00000 
010014101 
OoO110L11 
01901010 
01910000 
01010000 
00000000 


01081110 


onn10tol 
on1ootit 
00000010 
00000000 
00001000 
00000011 
000000048 
O1no1soL 
O1dd0s414 
Oo1sOLit 


ERPS SS 5 i 


01001100 
01001010 
14001100 
OUTIL 
0000000! 
O0171011 
00111000 
00000001 
Oos11041i 
00000010 
00n10000 
00111001 
00111010 
00101011 


00101000. 


01010000 
00101011 
90000000 
00000000 
00141010 
00111100 
00000001 


GENERAL CORPORATION 


09 rmeerend nent sap * 


ci 


ve 


42346 
42a3aT 
92350 
42351 
42352 
42353 
4a3sa 
42355 
42356 
42357 
42360 
42361 
42362 
42363, 
42364 
42365 
42366 


42367 


42370 
42371 
42372 
42373 
42374 
42375 
42376 
42377 
42400 
a2uo. 
42402 
42403 
w2ao4 
4240s 
42406 
42407 
42410 
wear 
aeaie 
a24ai3 
gaara 
42ats 
42416 
42417 
42420 
d2urt 
42ua2 
424a3 
4242 
424s 
42426 
42427 
424030 
u2a3t 
42432 
42833 
424za 
42435 
42036 
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230 
231 
232 
233 
‘234 
235 
236 
237 
2368 
239 
240 
e241 
282 
243 
2au 
as 
246 
247 
248 
249 


“250, 


esl 
252 
253 
254 
ass 
256 
257 
258 
eso 
260 
261 
262 
263 
268 
265 
266 
267 
268 
269 
270 
e7i 
e7e2 
273 
274 
e735 
276 
a77 
278 
279 
280 
2al 


282° 


283 
2E4 
285 
286 


00100000 
00101100 
00001100 
00000001 
00101000 
11191100 
00001100 
Oo11i00) 
o1o1i0n0 
00000001 
00100000 
19000010 
oooodon1 
00100000 
11100100 
00101000 
11101100 
01001000 
00110100 
11010010 
00001101 
00000001 
01000000 
91011000 
00111000 
o11001at 
00100000 
01000051 
00100100 
10000000 
00110000 
17000111 
00119001 
10101101 
10101010 
11010011 
10000010 
00000001 
00111000 
LOL11110 
01000051 
LiLALTOL 
00000110 
01000103 
01000100 
01000100 
01000100 
01000010 
01000100 
01000101 
00100000 
10011110 
01100101 
00100100 
10000010 
00101000 
01001000 


01011000 
00001110 
OO10L1OL 


sOvVd11i 


0n111000 
10100100 


00000011 — 


$1100010 
00111001 
10111001 
00111001 
10010100 
19130110 
OO111011 
ont00000 
00111000 
00010110 
00111000 
onon1oi1t 
01000011 
00000010 
10101101 
110481110 
OoL1d1st 
00000000 
00000001 
oo11o0i1ii 
ieee eeee! 
00001001 
n0n00000 
00011010 
00000000 
oono10is 
01010001 
01010000 
00000000 
10000011 
V14aL4101 
90100110 
00000000 
00000000 
00000000 
00N00000 
00010001 
01001100 
O1101110 
11011000 
10001101 
11110000 
1OVL4141 
oon110is 
90000000 
00000001 
oooo1sty 
10001010 
00101011 
o111G011 


ei 


' 


42437 
42440 
Geaat 
42442 
424a3 
4agaq 
42445 
4aaa6g 
42aa7 
42450 
4aasi 
4aasea 
42453 
4ad5a 
42455 
42456 
42457 
42460 
4246i 
42462 
4$a463 
42468 
42465 
42466 
42467 
42470 
42u7i 
42472 
G2a73 
42474 
42475 
424676 
42477 
42500 
42501 
42502 
42503 
42504 
42505 
42506 
42507 
42510 
8esii 
42512 
4a5i3 
asia 
4251S 
92516 
42517 
42520 
4a5a1 
42522 
42523 
42924 
4ases 
42526 
4a527 
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267 
288 
289 
290 
aot 
292 
293 
294 
29s 
296 
297 
298 
299 
300 
Bot 
302 
303 
304 
305 
306 
307 
306 
309 
310 
Bit 
312 
313 
318 
315 
316 
317 
318 
319 
320 
Sat 
3e2 
323 
3pa 
325 
326 
327 
328 
3°9 
330 
331 
332 
333 
334 
335 
336 
337 
338 
339 
340 
341 
342 
343 


00101000 
10000010 
01001000 
OLo010000 
01010000 
10000110 
00011000 
10000310 
00011000 
00110000 
10001010 
10000010 
11001111 
11010011 
00110000 
01010000 
10100111 
10101101 
01001000 
10101010 
00110000 
10000110 
11001110 
01100000 
00100000 
00110000 
11000141 
1000t110 
01001000 
01100000 
00100100 
00101000 
10001111 
00110001 
11000111 
10010010 
11010010 
11000110 
10001110 
01001000 
10000101 
00110000 
01110110 
00100001 
100018101 
fO101101 
01001000 
00000100 
00000101 
00000000 
01011000 
o10n0000 
10000010 
01000000 
00010000 
00100000 
00111000 


OO1;L101 
01000010 
00111100 
01010001 
91010010 
01010010 
01010001 
01001010 
01010010 
00000110 
11000000 
10000000 
19011100 
ao000001 
00011100 
Oo1t1101 
01000000 
01110000 
01001111 
01010000 
00011100 
01010010 
00000000 
1Ovtti4t 
01011100 
00000110 
00000000 
90000000 
01011100 
OL114111 
00001011 
00010101 
00000000 
90010000 


10010000° 


10010000 
10010000 
00000000 
00000000 
01010101 
0000000 
00111101 
119000001 
00000101 
00001101 
00000000 
00010100 
00101100 
00101000 
11110000 
04121010 
01111001 
1000000 
Or1i10%3 
01110111 
O11id1is 
00101011 


42530 
42531 
42532 
42533 
4e534 
42535 
42536 
42537 
42580 
82541 
4254e 
42543 
4a5aq 
42a5a5 
42546 
G2asga7 
82550 
4as51 
42552 
$2553 
4as5a 
42555 
42556 
42557 
42560 
42561 
492562 
42563 
42564 
42565 
42566 
42567 
42570 
4e571 
42572 
42573 
82574 
42575 
42576 
42577 
42600 
42601 
42602 
42603 
42604 
42605 
42606 
42607 
42610 
42611 
S2612 
42613 
82614 
$2615 
42636 
42617 
42620 
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3a4q 
3a5 
346 
3a7 
348 
349 
350 
351 
352 
353 
354 
355 
356 
357 
358 
359 
340 
361 
362 
363 
364 
365 
346 
367 
368 
369 
370 
371 
372 
373 
374 
375 
376 
377 
378 
379 
380 
381 
382 
383 
3684 
385 
386 
387 
388 
389 
390 
391 
392 
393 
394 
395 
396 
397 
398 
399 
400 


11100101 
00000001 

10000010 
ocoooont 
00111000 
01011000 
00001001 

00100000 
10000010 
00100000 
00111000 
01100000 
00000100 
14100101 
0000000! 

01000000 
00111000 
00100000 
10011101 
00000100 
00010006 
00100000 
00000001 
11111015 
10000101 
10000101 
01100101 
01000000 
01110910 
00111000 
11119011 

00111000 
11110010 
00119000 
11010010 
10000101 
10110010 
10010010 
41010010 
10011411 
11000010 
01100101 

01100000 
00110000 
01000000 
00111000 
11100110 
00111000 
111201011 

11110111 

10011911 
11011110 
10191511 

10101103 

01100111 

11010100 
00111000 


00100010 
00000110 
00000100 
00001010 
01011000 
01111100 
00100011 
O1V11081 
10000000 
01111001 
01112010 
OVLitiis 
00000000 
00000100 
11911008 
O1110151 
00000101 
01111000 
00100010 
00000011 
01111000 
01111100 
11110000 
00000000 
00000008 
91040000 
00n00001 
01110145 
OOrli1a 
01100100 
10010010 
O1N001111 
61000000 
94000010 
01110801 
00000000 
01000000 
01000000 
01100000 
10000000 
01000001 
00000001 
1OV19111 
01011000 
01011000 
00111010 
00000000 
00000110 
10010000 
90000000 
00000000 
10000000 
10000101 
00000000 
OOVLi1i4 
00000000 
00100101 
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0091 LP2os 0092 LP2o! 
Sebati 401 10011110 00000000 H27t2 458 01000100 11111101 
42622 402 01000011 00000000 42713 459 01000101 n1010001 
42623 403 00111000 00100110 92714 460 01000000 11181101 
42624 404 10111110 90000000 42715 441 01000000 on10001! 
42625 405 01000011 00000000 fo 42716 S62 00000000 00000100 
42626 406 00000101 O0000001 42717 463 00000000 on000101 
42627 407 01000100 10101000 42720 464 00000000 10000100 
42630 408 00101000 90110001 G2721 465 00111111 11111000 
42631 409 10101010 10000000 42722 466 OOLLI1I1 L1111001 
42632 410 01100000 10311111 42723 AGT GOLLL111 P1ti1010 
42633 411 00101000 oO1011t00 42724 4OB OOLLIIF1 14211011 
42634 d12 10101010 10000000 7 42725 °469 OOL1L1149 L11L1100 
42635 413 10101010 01110010 42726 470 OOLALALL 11911101 
42636 414 01001000 O10i11100 42727 471 OOLLIAIL 11941510 
42637 415 01100000 011141111 42730 472 MOLLLAIS LItALitt 
42640 416 00110000 00100011 3 G2731 473 OOOOO1OL 11111111 
42681 417 10110110 00000000 42732 474 00000000 00000000 
42642 418 01000010 00000000 42733 475 00000110 00000000 
42643 419 00000011 00000001 42734 47h 00000016 00010000 
42644 420 01100101 00000001 42735 477 OOOO1111 11510111 
42645 Bat 00110000 00011011 42736 478 00000000 00001111 
42646 4A2 00100000 00010010 : 42737 479 00000000 00000000 
42647 423 11000100 00010011 42740 480 00000000 00010000 
42650 dad 00000100 Ho10tino : 42741 461 00000010 00000000 
42651 425 00100000 00100000 Ba742 4A2 00000000 11911111 
42652 46 00110000 00011010 G2743 483 000H0000 O1111111 
42653 4297 10010101 00001101 42744 Ra 00000000 00000111 
42654 428 00100000 00101010 42745 485 00000000 00001000 
42655 429 01000000 00100000 42746 4B6 00000000 00N01010 
42656 430 00010000 00100000 42747 4Aa7 00000000 00001011 
42657 431 00011000 00100001 : 42750 488 00000000 o0n01101 
42660 432 00000001 onnosort 42751 4A9 01000000 00000000 
42661 433 00100000 onnoolit 42752 490 01001000 00000000 
42662 434 10000011 00000000 42753 491 01010000 00000000 
42663 435 01000000 00100001 - 42754 492 01011000 00000000 
42664 436 00100000 00001010 42755 493 01100000 00000000 
42665 437 10000011 00000000 42756 498 01101000 00000000 
42666 438 10010101 00001101 42757 495 01110000 00000000 
42667 839 00100000 00101010 . 42760 496 01111900 00000000 
42670 440 01000000 00100000 42761 897 00000000 0010000 
42671 Mai 01000000 00001010 42762 498 00000000 On011011 
42672 442 00100000 00011101 42763 499 00000000 00100000 
42673 443 00101000 0001100t ’ 42764 500 00000000 00110000 
4a674 444.101001N0 00000000 42765 S5H1 01000100 10101000 
42675 445 00000101 00000001 42766 S02 01000101 10000001 
42676 846 01000010 10011011 42767 503 01000101 01110001 
42677 447 00101100 00001100 42770 504 01000101 01101111 
42700 448 10101110 01001010 42771 SO5 91000001 00111000 
42701 449 00000100 00101100 42772 506 00010000 00000000 
42702 450 10000101 10010000 ; 42773 SO7 wssitird vaediral 
42703 AS51 01000000 01111101 42774 508 LLAAiiar wertinit 
42704 452 00100000 oo101010 . 42775 509 00000000 on000001 
42705 453 01000000 00100000 42776 S10 00000000 00000010 


42706 454 01000000 00001010 42777 511 01000000 00000000 
4a707 455 00100000 o0000111 fi 

42710 456 01000000 00100001 

42711 457 00000100 00110000 


